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PREFACE 


The Hewlett-Packard Distributed Systems Network (HP-DSN) is a set of hardware and 
software data communications products. One of these data communications products 1s 
DSN/Distributed Systems (DSN/DS) which is an integrated software package that provides 
the capability of communication between HP computer systems. 


This manual documents DSN/DS as it applies to an HP 3000 network. The manual 
explains how an HP 3000 user can communicate with another (or several other) HP 3000 
computer systems by establishing a DSN/DS communications link. (Other manuals in the 
DSN/DS series document the other network combinations of computer types. ) 

This manual explains the basic use of DS/3000 to users and programmers. A companion 
manual, the HP DSN/DS HP 3000 to HP 3000 Network Administrator Manual, explains 
more advanced concepts such as configuring a system, and using TRACE for debugging. 
Users of this manual should be familiar with the basic operating principles of the HP 3000 
computer system using the MPE operating system, and should also be familiar with the 
subjects covered in the following manuals: 


For MPE-IV (Versions not earlier than C.B1.A2): 


e HP 3000 Computer Systems, MPE Commands Reference Manual 
(30000-90009). 


© HP 3000 Computer Systems, MPE Intrinsics Reference Manual 
(30000-90010). 


e HP 3000 Computer Systems, System Manager/System Supervisor 
Reference Manual (30000-9001 4). 


© HP 3000 Computer Systems, Console Operator's Guide ( 32002-9000 4). 
For MPE-V/E (Versions not earlier than G. 00. 00): 


e HP 3000 Computer Systems, MPE V Commands Reference Manual 
(32033-90006) 


e HP 3000 Computer Systems, MPE V Intrinsics Reference Manual 
(32033-90007) 


e HP 3000 Computer Systems, MPE V System Operation and Resource 
Management Reference Manual (32033-90005) 
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For both: 


Data Communications Handbook (30000-90105) 


For those users who also become involved in the selection and/or connection of the various 
network components, reference should be made to the appropriate component manuals, 
including the following: 


HP 30010A Intelligent Network Processor (INP) Installation and 
Service Manual (30010-90001). 


-HP 30020A Intelligent Network Processor (INP) Installation and 


Service Manual (30020-90001). 


HP 30020B Intelligent Network Processor (INP) Installation and 
Service Manual (30020-90005). 


HP 30010A/30020A/B Intelligent Network Processor (INP) Diagnostic 
Procedures Manual (30010-90002). 


HP 30055A Synchronous Single-Line Controller (SSLC) Installation 
and Service Manual (30055-90001). 


Hardwired Serial Interface (HSI) Installation and Service Manual 
(30360-90001). 


For those programmers who use other subsystems in conjunction with DS/ 3000, the 
following manuals should be referenced: 


IMAGE/ 3000 Reference Manual (32215-90003) 
BASIC / 3000 Interpreter Manual (30000-90026) 
COBOL/II Reference Manual (32233-90001) 


KSAM/ 3000 Reference Manual (30000-90079) 


NOTE 


Within the text of this manual, cross-references are 
made to these manuals by title. To obtain the part 
number of the referenced manual, refer to these lists 
of manuals in the Preface. 


In this release, DSN/DS and DSN/X.25 are two separate products. If you are using DSN/DS between 
HP 3000 computers, either with or without X.25, you should use this manual for all DS information 
and refer to the DSN/DS HP 3000 to HP 3000 Network Administrator Manual (32189-90002) for 
information about protocols, hardware, configuration, and tracing. If you are communicating with a 
PAD terminal or an HP 2334A Cluster Controller, refer to the DSN/X. 25 for the HP 3000 Reference 
Manual (32191-90001). 
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NOTATION 


nonitalics 


italies 
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DESCRIPTION 


Words in syntax statements which are not in italics must be entered exactly as 
shown. Punctuation characters other than brackets, braces and ellipses must also be 
entered exactly as shown. For example: 


EXIT; 


Words in syntax statements which are in italics denote a parameter which must be 
replaced by a user-supplied variable. For example: 


CLOSE filename 


An element inside brackets in a syntax statement is optional. Several elements 
stacked inside brackets means the user may select any one or none of these elements. 
For example: 


[| User may select A or B or neither. 
When several elements are stacked within braces in a syntax statement, the user must 
select one of those elements. For example: . 


A 
B User must select A or Bor C. 
C 


A horizontal ellipsis in a syntax statement indicates that a previous element may be 
repeated. For example: 


[,itemname]...; 


In addition, vertical and horizontal ellipses may be used in examples to indicate that 
portions of the example have been omitted. 


A shaded delimiter preceding a parameter in a syntax statement indicates that the 
delimiter must be supplied whenever (a) that parameter is included or (b) that 
parameter is omitted and any other parameter which follows is included. For 
example: 


itema[,itemb][,zteme] 


means that the following are allowed: 


ttema 

itema,itemb 
ittema,itemb,iteme 
itema,,iteme 
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underlining 





CONTROL)char 


When necessary for clarity, the symbol A may be used in a syntax statement to 
indicate a required blank or an exact number of blanks. For example: 


SET [ (modifier) ]A(variable); 


When necessary for clarity in an example, user input may be underlined. For 
example: 


NEW NAME? ALPHA 


In addition, brackets, braces or ellipses appearing in syntax or format statements 
which must be entered as shown will be underlined. For example: 


LET var[[subseript]] = value 


Shading represents inverse video on the terminal’s screen. In addition, it is used to 
emphasize key portions of an example. 


The symbol (____) may be used to indicate a key on the terminal’s keyboard. For 
example, indicates the carriage return key. 


Control characters are indicated by followed by the character. For example, 
(CONTROL)Y means the user presses the control key and the character Y simultaneously. 
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SECTION 


secon 


The Hewlett-Packard Distributed Systems Network (HP-DSN) is a combination of hardware and 
software products that make it possible for Hewlett-Packard computer systems to communicate with 
one another, and with IBM mainframes as well. The connections can be made over hardwired lines, 
and/or over the public telephone facility, and/or across Public Data Networks (PDNs), in any mixture. 
This capability, coupled with our proven remote entry capability to IBM computer systems, provides a 
total solution to large-company electronic data processing (EDP) needs. 


INTRODUCING DSN/DS 





But exactly what does this overall capability mean? It means that a large multidivisional corporation 
can have a truly coordinated world-wide network of computer systems. They are coordinated in the 
sense of tying together the various commercial and industrial functions within each division and 
factory, and they are also coordinated in the larger sense of tying together the various divisions and 
factories at the corporate level. 


For example, imagine a large corporation which has factories in the United States, Canada, France, and 
West Germany. Within each factory there are HP 3000 computer systems performing such functions 
as inventory control, factory data collection, and operations management. With a Hewlett-Packard 
Distributed Systems Network these manufacturing information systems can be tied into an HP 3000 
system which handles the factory’s administrative functions (such as finance and accounting). The 
administrative systems of each factory can, in turn, be connected not only to one another but also (via 
remote job entry) to a large computer facility at corporate headquarters. This overall networking 
capability makes it possible to perform financial analysis and control at a group and corporate level as 
well as at the individual factories. 


Within the realm of HP-DSN is the software subsystem that accomplishes HP computer-to-HP 
computer communication over these connecting lines. This software subsystem is called 
DSN/Distributed Systems (DSN/DS). Among other features, DSN/DS includes such capabilities as: 


° Virtual Terminal/Remote Command Execution. Gives the user remote interactive 
capabilities, even though the user’s terminal is physically connected to the local HP system. 


e Remote File Access. A user is allowed access to files in remote HP computer systems. An 
important aspect of this feature is the capability of using Interprocess Communications (IPC) 
between systems. 


e Remote Data Base Access. A user can directly access data bases on any remote HP computer 
under the same security protection used by local data bases. . 


e  Program-to-Program Communication. Permits programs residing in different HP computer 
systems to interactively exchange information with one another in a coordinated manner. 


e Network File Transfer. A facility that efficiently transfers disc files between HP 3000 
computer systems. 


This manual describes how an HP 3000 user can communicate with several HP 3000 computers by 
establishing a DSN/DS communications link. DSN/DS is that part of the HP Distributed Systems 
Network in which several HP 3000 computer systems are connected to one another. DSN/DS can also 
be used for intercomputer communications with other families of computers (such as HP 3000/HP 
1000, HP 3000/HP 250, and HP 3000/HP 98xx desktop computers), but these other combinations are 
described in separate reference manuals. 
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As a simplified example of a computer network, imagine that you are in the same room with an HP 
3000 (labeled "System A" in Figure 1-1) and that another HP 3000 (labeled "System B") resides in 
another part of the building. These two computers are connected to one another by an 
interconnecting cable and a pair of communications interfaces. By virtue of DSN/DS you can use the 
processing capability of both of these HP 3000 machines and pass data back and forth between them 
by entering commands through a single terminal. 


To see how DSN/DS works in this simple example, follow through the step-by-step procedure. 


HP3000 HP3000 
Communications 


foooN 


Interconnecting 
Cable 


Figure 1-1. HP 3000 to HP 3000 Example 
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Step 1. Sit down at a terminal connected to System A and initiate a session. 


RETURN 
;HELLO USER. ACCOUNT 


HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 9:05 AM 
WELCOME TO SYSTEM A. 


Within the context of DSN/DS, such a session is referred to as a "local" session because it is active 
within the HP 3000 to which your terminal is directly connected. This terminology becomes more 
meaningful later, since all you have actually done, so far, is initiate a standard MPE session. At this 
point, you have reached the situation illustrated in Figure 1-2. 


HP3000 HP3000 
Communications 


SYSTEM A Interfaces SYSTEM B 


foo™N 









LOCAL 
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Interconnecting 
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Figure 1-2. Initiating the Local Session 
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Step 2. Now, open a communications line between System A and System B. Do this by entering a 
:DSLINE command. 


>DSLINE REMOTE1 
DS LINE NUMBER = #L3 


In this example, REMOTE1 is the DS device class name established during system configuration (in 
System A) for the particular line you wish to use. DSN/DS opens the line and then assigns you a line 
number (3 in this example). This line number is analagous to the file number returned to you by the 
MPE File System when you open a file programmatically using the FOPEN intrinsic. Within your local 
session, it uniquely identifies the particular line that you have opened. This becomes significant only 
if you must open more than one communications line during a session. 


Step 3. Now that you have acquired access to a communications line between System A and System B, 
initiate a session in System B (from your local log-on terminal). Do this by entering a REMOTE 
command which includes an MPE HELLO command for the remote system. 


:REMOTE HELLO RUSER.RACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 9:08 AM 


WELCOME TO SYSTEM B. 


Within the context of DSN/DS, this type of session is referred to as a "remote" session because it is 
active within the remotely located HP 3000 that is connected indirectly to your log-on terminal by 
way of a communications line and your local HP 3000. You now have two distinct sessions in progress 
concurrently: one in System A (under the user and account names USER.ACCOUNT) and the other in 
System B (under the user and account names RUSER.RACCOUNT). It is important to keep in mind that 
within System A your local session is operating under the capabilities and security restrictions defined 
(by the accounting structure of System A) for USER. ACCOUNT, while within System B your remote 
session is operating under the capabilities and security restrictions defined (by the accounting structure 
of System B) for RUSER.RACCOUNT. At this point, the situation is as illustrated in Figure 1-3. As 
will be seen in the next few steps, you can alternate freely between the two sessions. 
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Figure 1-3. Initiating the Remote Session 


Step 4. Now, see what files reside in the home group of the ACCOUNT account in System A. 
: LISTE 
FILENAME 
DATA1 DATA3 FILE1 SOURCE2 SOURCES 
You can do the same for the home group of the RACCOUNT account in System B by entering the 
following command through the same terminal: 
:REMOTE LISTF 
FILENAME 
DATA1 DATAS DATAG6 FILE3 SOURCE 1 
Notice that in both cases the same command was entered, but in the latter case the prefix REMOTE was 


used. The presence or absence of that prefix is what determines whether a command is to be executed 
in the local session or in the remote session. 
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Step 5. Asa result of the LISTF and REMOTE LISTF displays, you can see that a source file, named 
SOURCE 1, exists in System B but not in System A. Suppose you wish to modif y one of the statements 
in that program. To do that, use the text editor in System B. This time, instead of prefixing your 
remote commands with REMOTE, try a different technique. Enter the following: 


: REMOTE 
# 


This construct gets into the remote session in such a way that all commands can be entered in their 
normal form (without the prefix REMOTE). The # is the prompt character issued by DSN/DS (in place 
of the usual MPE colon prompt). In all other respects it will seem as though you are executing an 
MPE interactive session on your local computer. 


Step 6. Now invoke the text editor, copy the content of SOURCE! (which is a file in System B) into 
the editor’s work file, display the content of the work file, modify the desired statement, and store the 
altered source code back in SOURCE]. 


#EDITOR 

HP32201A.7.05 EDIT/3000 WED, MAR 5, 1980, 3:47 PM 
(C) HEWLETT-PACKARD CO. 1979 

/SET FORMAT=COBOL 

/T SOURCE1 

/LIST ALL 

1 $CONTROL USLINIT,SOURCE 

IDENTIFICATION DIVISION. 

PROGRAM-ID. COBOL-TEST1. 

ENVIRONMENT DIVISION. 

DATA DIVISION. 

WORKING-STORAGE SECTION. 

77 EDIT-FIELD PIC $$$$$9.99. 

77 TOTAL-COST PIC g999V99. 

7? COST-OF-SALE PIC 99V99. 

(7 TAX PIC 99V99. 
7 Y-N PIC X. 

PROCEDURE DIVISION. 

ENTER-ROUTINE. 

MOVE ZEROS TO TOTAL-COST. 

DISPLAY SPACE. 

DISPLAY "ENTER COST OF SALE". 

ACCEPT COST-OF~SALE. 

COMPUTE TAX = COST-OF-SALE * .06. 
ADD COST-OF-SALE, TAX TO TOTAL-COST. 
MOVE TOTAL-COST TO EDIT-FIELD. 
DISPLAY "TOTAL COST= " EDIT-FIELD. 
.1 DISPLAY "ARE YOU FINISHED? (Y OR N)". 
-2 ACCEPT Y-N. 
3 IF Y-N = "N" OR "n' GO TO ENTER-ROUTINE. 
»4 STOP RUN. 


OON ODM DBWH=A]NOWDN OO AWD — 
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/MODIFY 2.5 
MODIFY 2.5 
DISPLAY "ENTER COST OF SALE". 
I (NO DECIMAL POINT) 
DISPLAY "ENTER COST OF SALE (NO DECIMAL POINT)”. 


/KEEP SOURCE‘ 

SOURCE! ALREADY EXISTS - RESPOND YES TO PURGE OLD AND KEEP NEW 
PURGE OLD? YES 

/EXIT 


END OF SUBSYSTEM 
# 


Step 7. The work in System B is now completed; so terminate the remote session and return control to 
your local session. 


#BYE 


CPU=4. CONNECT=7. WED, MAR 3, 1982, 9:15 AM 
#: 


Note that you are now back in the local session in System A (signified by the colon prompt). The 
remote session no longer exists, but the communications line is still open. You could, if you wanted, 
initiate another remote session over the line by issuing another REMOTE HELLO command. To close 
the communications line, enter the following variation of the :DSLINE command: 


:DSLINE REMOTE1 ;CLOSE 
1 DS LINE WAS CLOSED. 


Finally, terminate the local session. 
: BYE 


CPU=1. CONNECT=11. WED, MAR 3, 1982, 9:16 AM 


| east 


SECTION 


THE COMMUNICATIONS LINK 
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WHAT IS A COMMUNICATIONS LINK? 


Within the context of DSN/DS, a "communications link" consists of the following elements: 
e An interactive session in progress on an HP 3000 computer. 


e A physical communications line between that HP 3000 computer and another HP 3000 computer 
at a remote location. 


e An interactive session in progress in the remote HP 3000 computer (initiated over the physical 
communications line from your local session). 


Note that your local terminal is the log-on terminal for both the local session and the remote session. 
(See Figure 2-1.) 


HP3000 HP3000 


= 
SESSION /— — — -\_SESSION 


| Communications Line 





User’s 
Log-on 
Terminal 


Figure 2-1. DSN/DS Communications Link (HP 3000 to HP 3000) 
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A communications link can be established over a hardwired communications line, over the public 
telephone network, or over an X.21 or X.25 Public Data Network (PDN). The procedures for opening 
hardwired lines and for opening telephone lines differ only slightly. Therefore, the basic differences 
will be presented first, followed by the procedures that are essentially the same. Generally, once the 
connection to the remote computer is established, you will perceive no difference in the way DSN/DS 
performs. 


Opening a Hardwired Line 


What is a hardwired line? In the general field of data communications there are two types of lines 
commonly referred to as "hardwired." The first type is a dedicated path on the public telephone 
network that is leased from the telephone company for the private use of a computer-to-computer 
configuration. Such a line serves as a permanent connection between the two computers. The other 
type of hardwired line is a cable that is connected directly to the communications I/O interfaces of 
the two computers. Within the context of DSN/DS, "hardwired" always refers to a cable connection. 
However, the technique for opening a line is the same for either a direct-connect line or a leased 
(nonswitched) telephone line. 


The hardwired interconnecting cable connects to each HP 3000 by way of a communications 
interface. The communications interfaces that can be used for a hardwired connection are listed in 
Table 2-1. Although the INPs and the SSLC are the interfaces most commonly used for telephone 
line connections with modems, they can also be used in hardwired applications without modems. 
Refer to Table 2-1 to see which controller is used with which HP system. 


Table 2-1. Associations between Controllers and Systems. 


HP 30010A 
Intelligent Network Processor (INP) 













HP 3000 Series II/III 














HP 30020A 
Intelligent Network Processor 


HP 3000 Series 30/33/39/40/42/44/48 














HP 30020B 
Intelligent Network Processor 


HP 3000 Series 
30/33/39/40/42/44/48/64/68 













HP 30055A 


HP 3000 Series II/I 
Synchronous Single-Line Controller (SSLC) 














HP 30360A 
Hardwired Serial Interface (HSI) 


HP 3000 Series II/III 
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It is relatively straightforward to obtain access to a hardwired communications line. All you are 
required to do is identify the particular communications interface you wish to use. 


NOTE 


Throughout this manual, the term "dsdevice" will be used 
as a generic term for logical device number, class name 
or, in the case of X.25, a node name. 


You identify the particular communications interface of the particular line you wish to use by 
specifying the dsdevice associated during system configuration with the desired interface. In the 
example in Section 1, the :DSLINE command was used for this purpose, as follows: 


:DSLINE REMOTE 1 


If you are the first person to use a :DSLINE command after the operator has enabled the DS line, you 
may also wish to specify the size of the DSN/DS line buffer to be used in conjunction with the line. 
The size of this buffer determines the maximum amount of data that can be sent or received in a 
single physical transmission over the line. Note that a transmission as you normally think of it 
(sending or receiving all or part of a file) may actually consist of many physical transmissions. In 
essence, this buffer size defines a blocking factor for the line. (See Figure 2-2.) A default buffer size 
is established during system configuration, and in most cases (as in the example in Section 1), you will 
find it satisfactory to let this default value prevail. If you do wish to change the line buffer size, use 
the Linebuf parameter as described on pages 2-17 and 2-18. 
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Assume that the DSN/DS line buffer size is 512 words and that the user has initiated the transmission 
of a block of data 1200 words in length from an HP 3000 to a remote HP 3000. The block of data 
would actually be sent in three separate transmissions, as follows. (DSN/DS appends an average of 20 
words of overhead on each transmission. ) 


1200 words of data to 
be transmitted 


First physical 
transmission: 512 
words (492 words of 
data + 20 words of DS 
overhead) 


Second physical 
transmission: 512 
words (492 words of 
data + 20 words of DS 
overhead) 


Sm me we ee ew ew oe wm ee ww we we ee we ee es we ee ee ee 


Third physical 
transmission: 236 
words (216 words of 
data + 20 words of DS 
overhead) 


om eee me ee we ee me we ew ew ee ww ee we ow ew oe we we 
ee ee we ee we ee me we ee ee 


1200 words of data 
received at remote 
computer 


Figure 2-2, DSN/DS Line Buffer Example 


When you execute a :DSLINE command, DSN/DS attempts to give you access to the specified 
communications line and, if successful, informs you of the assigned DS line number by displaying the 
following message at your terminal: 


DS LINE NUMBER = #Lx 
where x is the assigned DS line number. In the example in Section 1, the DS line number "3" was 
assigned. The DS line number is significant only if you open and use more than one communications 
line concurrently within a single local session (see "Opening Multiple Lines" later in this section). 
At this point you have acquired a physical communications line but the communications link does not 


yet exist. The actual communications link between the two computers is established by initiating a 
remote session over the line. You do this by executing a REMOTE HELLO command. In the example in 
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Section 1, the REMOTE HELLO command contained the minimum parameters required (a username and 
an accountname), as follows: 


:REMOTE HELLO RUSER.RACCOUNT 


The communications link between the two HP 3000 computers now exists. 


Opening a Telephone Line 


A DSN/DS communications link can also be established over the public (dial-up) telephone network. 
In such a case, the information passed back and forth between the two computers travels over the 
same lines that are used for normal voice traffic. Each computer is interfaced to the telephone lines 
by way of a modem. (The term "modem" is a contraction of MOdulator-DEModulator.) A modem is a 
device that translates digital signals (electrical impulses) generated by a computer into analog signals 
(tones) that can be transmitted over telephone lines, and vice versa. 


The modem is connected to the HP 3000 Computer System by way of a communications interface. 
The communications interfaces used with modems are listed in Table 2-2. Refer to Table 2-2 to see 
which controller is used with which HP system. Each INP or SSLC controls one modem (such as an 
HP 37210T, 37220T, or 37230A modem, or a Bell System Type 201, 208, or 209 modem), and is 
capable of both initiating and accepting a telephone connection with a remote computer over the 
public telephone network or a leased telephone line. 


Table 2-2. Associations between Controllers and Systems. 


[contre 


HP 30010A 
Intelligent Network Processor (INP) 















HP 3000 Series II/III 














HP 30020A 
Intelligent Network Processor 


HP 3000 Series 30/33/39/40/42/44/48 





HP 3000 Series 
30/33/39/40/42/44/48/64/68 





HP 30020B 
Intelligent Network Processor 












HP 30055A HP 3000 Series II/II 


Synchronous Single~Line Controller (SSLC) 
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It is a little more complex to obtain access to a telephone line than to a hardwired line. First, you 
must identify the particular communications interface (INP or SSLC) you wish to use. You do this by 
specifying the device class name or logical device number of the communication line that was 
associated during system configuration with the desired interface. You use the :DSLINE command for 
this purpose, as follows: 


:DSLINE REMOTE2 


If you are the first person to use a :DSLINE command after the operator has enabled the DS line, you 
may also wish to specify the size of the DSN/DS line buffer to be used in conjunction with the line. 
The size of this buffer determines the maximum sized block that can be sent or received in a single 
physical transmission over the line. Note that a transmission as you normally think of it (sending or 
receiving all or part of a file) may actually consist of many physical transmissions. In essence, this 
buffer size defines a blocking factor for the line. (See Figure 2-2.) A default buffer size is 
established during system configuration, and in most cases (as in the example in Section 1), you will 
find it satisfactory to let this default value prevail. If you wish to change the line buffer size, use the 
Linebuf parameter as described on pages 2-17 and 2-18. 


Next, you may wish to supply a set of identification (ID) sequences to be used in verif ying that the 
desired pair of computers are connected to one another. This is discussed under "ID Sequences" later 
in this section. Briefly, however, you may supply an ID sequence that identifies your HP 3000 and 
one or more ID sequences that identify the remote computer with which you wish to be connected. 
When a telephone connection is established between your HP 3000 and a remote HP 3000, the two 
computers exchange ID sequences and their validity determines whether or not the connection is to 
remain in effect. You use the :DSLINE command to supply ID sequences, as follows: 


:DSLINE REMOTE2 ;LOCID="SYSTEM A" ;REMID="SYSTEM X" 


where SYSTEM A is the ID sequence identifying your local HP 3000 and SYSTEM X is the ID sequence 
identifying the remote computer with which you want to establish a telephone connection. 


Again, there are default values that can be established during system configuration. In most cases, 
however, you will at least want to explicitly identify the desired remote HP 3000 to be certain that 
the proper connection is being established. 


Now you must establish the physical connection between the two computers by dialing (at the modem) 
the telephone number of the remote computer and responding (at the system console) to the dial 
request. If you wish to have the console operator of your HP 3000 dial the number for you, you may 
supply the desired number in the :DSLINE command and it will be displayed as part of a dial request 
message at the operator’s console. In such a case, you would supply the telephone number as follows: 


:DSLINE REMOTE2 ;LOCID="SYSTEM A" ;REMID="SYSTEM X" ;PHNUM=555-1234 


If autodial equipment is installed on the REMOTE? line, the telephone number supplied in the 
:DSLINE command is used instead of the number configured for the line. 


The various possibilities involved in establishing a telephone connection with a remote computer are 
discussed under "Dialing the Remote Computer" later in this section. 


When you execute the :DSLINE command, DSN/DS attempts to give you access to the specified 
communications interface (INP or SSLC) and, if the telephone connection is successfully established, 
informs you of the assigned DS line number by displaying the following message at your terminal: 


DS LINE NUMBER = #Lx 


2>6 


Opening a Line 


where x is the assigned DS line number. In the example in Section 1, the DS line number "3" was 
assigned. The DS line number is significant only if you open and use more than one communications 
line concurrently within a single local session (see "Opening Multiple Lines" later in this section). 


At this point, you have acquired a physical communications line, but the communications link does not 
yet exist. The actual communications link between the two computers is established by initiating a 
remote session over the line. You do this by executing a :REMOTE HELLO command. In the example 
in Section 1, a :REMOTE HELLO command was used that contained the minimum parameters required 
(a username and an accountname), as follows: 


:REMOTE HELLO RUSER.RACCOUNT 


The communications link between the two HP 3000 computers now exists. 
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Specifying a DS Line 


As you have seen, in order to open either a hardwired communications line or a dial-up telephone line, 
you must specify a dsdevice identifying the particular communication line that is associated with the 
specific interface you wish to use. Deciding which name and number to use is complicated, but in real 
life, once the hardware and software configuration is installed and usable, most DSN/DS sites will post 
a notice defining all of the available communications lines and the proper device class names, logical 
device numbers, or nodenames for each. The following examples describe the procedure in case you 
wish to know how it works, or if your system does not post them. 


For each communications interface, there is a pair of associated drivers. First, there is the actual INP, 
HSI, or SSLC driver that directly controls the operation of the interface board. In addition, there is a 
DSN/DS communications driver that controls the operation of the INP, HSI, or SSLC driver. The 
names of these drivers are as follows: 


IOINPO (INP driver) 

CSHBSC0 (HSI driver) 

CSSBSCO (SSLC driver) 

IODSO (DSN/DS communications driver, while utilizing the bisync protocol) 

IODSX (DSN/DS communications driver, while utilizing the DSN/X. 25 software) 
IODSTRMO (DSN/DS virtual terminal driver, while utilizing the bisync protocol) 
IODSTRMX (DSN/DS virtual terminal driver, while utilizing the DSN/X. 25 software) 


Now look at the appropriate sample I/O device table produced during system configuration. (See 
Figures 2-3 and 2-4 for a hardwired line or Figures 2-5 and 2-6 for a telephone line). 


One or more virtual terminal drivers (IODSTRMO or IODSTRMX) are also configured into a system. 
The IODSTRMO/IODSTRMx entries allow users on another system to be logged on to a system and 
regulate the number of remote Session Main Processes (SMP) that can be assigned to a given line. 
Each IODSTRM0/IODSTRMxX entry is related to the proper communications interface entry by the 
number specified in the column labeled DRT. Figure 2-4 (the INP hardwired example) shows logical 
device 67 paired with logical device 27; Figure 2-6 (the INP telephone line example) shows logical 
device 68 paired with logical device 26. 


In Figure 2-3, notice that the HSI board entries (logical devices 12 through 15) look the same except 
for the PORTMASK. The PORTMASK specifies which port on the board is to be used. There are also 
virtual terminals (logical devices 60 through 64) referencing back to logical device 12. Since only one 
port on the HSI board can be opened at a time, only one block of virtual terminal entries is needed for 
that board. As each port is opened individually by specifying the corresponding dsdevice in the 

: DSCONTROL command (see Section 9), the system automatically reallocates the virtual terminal 
entries to the proper HSI board entry. This reallocation will not, however, show up in the I/O 
configuration table. This use of virtual terminals is unique to the HSI SSLC and INP configurations 
require a block of terminals for each interface configured. 


In Figure 2-3, the shaded items in the column labeled DRIVER NAME show four HSI lines (CSH BSCO) 
configured into the system as logical devices 12 through 15. For each one of these lines, there is a 
DSN/DS communications driver, IODSO, also configured into the system. Each IODSO entry is related 
to the proper HSI entry by the number specified in the column labeled DRT (the # prefix indicates a 
back reference to a previously defined logical device number). Logical devices 50 through 53 are 
paired with logical devices 12 through 15, respectively. In this example, it is the device class name or 
logical device number of the appropriate IODSO entry that would be used to specify the desired line. 
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LOG DRT U CT SUB REC 
DEV # N HY TYPE TERMINAL WIDTH 
# I AP TYPE SPEED 

T NE 
1 4 0 00 6 128 
2 5 0 00 3 128 
5 13 0 08 0 40 
6 14 0 0 322 66 
7 6 O 0 240 128 
8 6 i 0 240 128 
9 6 2 0 240 128 
10 6 3 0240 128 
11 20 0 O 340 128 

6 0 0 19 3 0 

0 0 19 3 0 

0 0 19 3 0 

0 0 19 3 0 

0 0 16 0 10 ?? 40 

1 0 16 0 I ue 40 

2 0160 Li; vie 40 

3 0 16 0 V1. 22 40 

4 0 16 0 11 2? 40 

5 0 16 1 si 40 

0 0170 0 

0 017 3 0 

0 0180 0 

0 0 41 0 128 

0 OO 41 0 128 

0 0 41 0 128 

0 0 41 0 128 

0 0 16 0 Ya ae 40 

0 0 16 0 oo at 40 

0 0 16 0 ae os 40 

0 0 16 0 Ci Ue 40 

0 0 16 0 fe as 40 
66 #26 0 O 41 1 128 
67 #27 0 O 41 1 128 
68 #26 0 0 16 0 im 40 
69 #27 0 O 16 0 or, 2% 40 
70 #28 0 O 41 0 te 128 
71 #29 0 0 160 gaan © § 36 





OUTPUT 


DEV 


LP 


LP 
LP 
LP 
LP 


71 


MODE 


JAID 
JAID 
JAID 
JAID 
JAID 
JAID 


Cy Cy Cy Cy Cy 
H 
Oo 


Ca 
Ht 
Oo 


DRIVER 
NAME 


IOMDISC1 


IOMDISCO 
IOCRDO 
TOPRTO 
IOTAPEO 
IOTAPEO 
IOTAPEO 
IOTAPEO 
IOPTPNO 


Q 







CSHBSCO 
IOTERMO 
IOTERMO 
LOTERMO 
IOTERMO 
IOTERMO 
LOTERMO 
IOINPO 

IOINPO 





IODSO 
ITODSO 
IODSTRMO 
IODSTRMO 
IODSO 
IODSTRMO 


Figure 2-3. Sample I/O Device Table (Hardwired Line with HSs]) 
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DEVICE 
CLASSES 


SPOOL 
SYSDISK 
DISC 
CARD 

LP 
TAPE 
TAPE 
TAPE 
BATAPE 
PTPUNCH 
HST1 
HSTe2 
HSI3 
HST4 
CONSOLE 
TERM 
TERM 
TERM 
TERM 
TERM 
INP1 
INP2 
SSLC2 
HDS 1 
HDS2 
HDS3 
HDS4 
DSTERM 
DSTERM 
DSTERM 
DSTERM 
DSTERM 
DSLINE1 
DSLINE2@ 
INP1 
INPe2 
SDS 1 
DSTERM 
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In Figure 2-4, the shaded items in the column labeled DRIVER NAME show an INP ( IOINPO) 
configured into the system as logical device 27. (Note that the subtype is 3, indicating hardwired. ) 
For this line, there is a DSN/DS communications driver (IODSO) also configured into the system. The 
IODSO entry is related to the proper INP entry by the number specified in the column labeled DRT 
(the # prefix indicates a back reference to a previously defined logical device number). Logical device 
67 is paired with logical device 27. In this example, it is the device class name (DSLINE2) or logical 
device number (67) of the IODSO entry that would be used to specify the desired line. 


NOTE 


Figure 2-4 does not show a line configured for X.25 
activity to another HP 3000. The back referencing 
scheme is identical to this example. However, the 
following differences should be noted for an X.25 
configuration: 


e The communications driver is named IODSX. 


e The device class name or logical device number of an 
IODSX entry should not be used in a :DSLINE 
command (or in other commands, such as DSCOPY). 
To access the desired remote node, we encourage 
DSN/X. 25 users to enter a nodename whenever a 
dsdevice is required. See page 2-16 to determine a 
node name. 
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LOG DRT U CT SUB REC OUTPUT MODE DRIVER DEVICE 
DEV # N HY TYPE TERMINAL WIDTH DEV NAME CLASSES 
# I AP TYPE SPEED 
T NE 
1 4 0 90 6 128 0 IOMDISC1 SPOOL 
SYSDISK 
000 3 128 0 IOMDISCO DISC 
0 08 0 40 LP JA TOCRDO CARD 
0 0 322 66 0 IOPRTO LP 
0 0 240 128 LP IOTAPEO = TAPE 
1 0 24 0 128 LP IOTAPEO TAPE 
2 0 240 128 LP IOTAPEOQ TAPE 
3 0 240 128 LP JA IOTAPEO BATAPE 
0 0 340 128 0 IOPTPNO PTPUNCH 
0 0 19 3 0 0 CSHBSCO HST1 
0 0 19 3 0 0 CSHBSCO HSTIe2 
0 019 3 0 0 CSHBSCO HSI3 
060 19 3 0 0 CSHBSCO HSI4 
0 0 16 0 10 ?? 40 20 JAID IOTERMO CONSOLE 
1 0 16 0 se ee 40 21 JAID IOTERMO TERM 
2 0 16 0 is er cs 40 22 JAID IOTERMO TERM 
3 0 16 0 Te te 40 23 JAID IOTERMO TERM 
4 0 160 a) “ay 40 24 JAID IOTERMO TERM 
5 0 16 1 11 2? 40 25 JAID IOTERMO = =TERM 
0 0170 0 0 IOINPO INP1 
0 017 3 0 0 INP2 
Oo 0 18 0 0 0 CSSBSCO = =SSLC2 
0 O 41 0 128 0 IODSO0 HDS 1 
0 0 41 0 128 0 IODSO HDS2 
0 O 41 0 128 0 TODSOQ HDS3 
0 0 41 0 128 0 IODSO HDS4 
0 0 16 0 £2 aad 40 60 J ID IODSTRMO DSTERM 
0 0 16 0 fo. le 40 61 J 1D IODSTRMO DSTERM 
0 0 16 0 Oe. “oe 40 62 J 1D IODSTRMO DSTERM 
0 0 16 0 te he 40 63 J 1D IODSTRMO DSTERM 
0 0 16 0 2. 2G 40 64 J ID IODSTRMO DSTERM 
0 0 16 0 a a 24 40 65 J ID IODSTRMO DSTERM 
0 O 41 1 128 0 IODSO DSLINE1 
0 O 41 1 128 0 G DSLINE2 
0 0 16 0 Le Ge 40 68 J 1D IODSTRMO INP 
0 0 16 0 ce 26 40 69 J ID Q INP2 
0 O 41 0 ae 128 0 IODSO SDS 1 
0 0 16 0 eee as 36 T1 J 1D IODSTRMO DSTERM 





Figure 2-4. Sample I/O Device Table (Hardwired Line with INP) 
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In Figure 2-5, the shaded items in the column labeled DRIVER NAME show one SSLC (CSSBSCO) 
configured into the system as logical device 29. (Note that the subtype is 0, indicating a switched 
telephone line.) Notice the DSN/DS communications driver, IODSO, is related to the SSLC entry by 
the number specified in the column labeled DRT (the # prefix indicates a back reference toa 
previously defined logical device number). Logical device 70 is paired with logical device 29. It is the 
device class name (SDS1) or logical device number (70) of the IODSO entry that would be used to 
specify the desired line. 


Opening a Line 





LOG DRT U CT SUB REC OUTPUT MODE DRIVER DEVICE 
DEV # N HY TYPE TERMINAL WIDTH DEV NAME CLASSES 
# I ROP TYPE SPEED 
T NE 
{ 4 0 0 6 128 0 IOMDISC1 SPOOL 
ve SYSDISK 
0 00 3 128 0 IOMDISCO DISC 
008 QO 40 LP JA S IOCRDO CARD 
0 0 32 2 66 0 S IOPRTO LP 
0 0240 128 LP IOTAPEO TAPE 
1 0 240 128 LP IOTAPEO TAPE 
2 0240 128 LP IOTAPEO TAPE 
3 0 240 128 LP JA S IOTAPEO BATAPE 
0 0 340 128 0 IOPTPNO PT PUNCH 
0 019 3 0 0 CSHBSCO~—HS11 
0 0 19 3 0 0 CSHBSCO = HST 2 
0 019 3 0 0 CSHBSCO-~ = HST3 
0 019 3 0 0 CSHBSCO- = HST 4 
0 0 16 0 10 ??% 40 20 JAID IOTERMO CONSOLE 
1 0160 1m a 40 21 JAID IOTERMO TERM 
2 0160 11 ?? 40 22 JAID IOTERMO TERM 
3 0 16 0 11 2? 40 23 JAID IOTERMO TERM 
4 0160 11 2? 40 24 JAID IOTERMO TERM 
5 0 16 1 Tt 2 40 25 JAID IOTERMO TERM 
0 017 0 0 0 IOINPO INP1 
0 017 3 0 0 IOINPO INP2 
0 0 18 0 0 0 SP “000©=6- SSLC2 
0 0 41 0 128 0 HDS 1 
0 0 41 0 128 0 HDS2 
0 O 41 0 128 0 HDS3 
0 O 41 0 128 0 ITODSO HDS4 
0 0160 =?? ?? 40 60 J ID  IODSTRMO DSTERM 
00160 ?? ?2 40 61 J ID  IODSTRMO DSTERM 
0 0160 ?? ?? 40 62 J ID IODSTRMO DSTERM 
0 0160 ?2 2? 40 63 J ID  IODSTRMO DSTERM 
0 0160 ?? ? 40 64 J ID  IODSTRMO DSTERM 
0 0160 i??? ?? 40 65 J ID  IODSTRMO DSTERM 
0 O 41 1 128 0 IO0DSO DSLINE1 
0 O 41 1 128 0 IODSO DSLINE2 
0 0160 ?? 40 68 J ID  IODSTRMO INP1 
0 0160 ?2 ?? 40 69 J ID  IODSTRMO INP2 
0 0 41 0 a 128 0 SDS 1 
0 0160 ?? ea 36 71 ID DSTERM 
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Sample I/O Device Table (Telephone Line with SSLC) 


Opening a Line ~ 


In Figure 2-6, the shaded items in the column labeled DRIVER NAME show an INP (IOINPO) 
configured into the system as logical device 26. (Note that the subtype is 0. This indicates that the 
INP is used for a dial-up line.) For this line, there isa DSN/DS communications driver, IODSO, also 
configured into the system. The IODSO entry is related to the proper INP entry by the number 
specified in the column labeled DRT (the # prefix indicates a back reference to a previously defined 
logical device number). Logical device 66 is paired with logical device 26. It is the device class name 
(DSLINE1) or logical device number (66) of the IODSO entry that would be used to specify the desired 
line. 
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LOG DRT U CT SUB REC OUTPUT MODE DRIVER DEVICE 
DEV # N HY TYPE TERMINAL WIDTH DEV NAME CLASSES 
# I AP TYPE SPEED 
TNE 
1 4 000 6 128 «0 IOMDISC1 SPOOL 
SYSDISK 
0 00 3 128 0 IOMDISCO DISC 
008 0 40 LP JA IOCRDO —- CARD 
0 0322 66 0 IOPRTO = LP 
0 0240 128 LP IOTAPEO TAPE 
1 0 240 128 LP IOTAPEO TAPE 
2 0240 128 LP IOTAPEO TAPE 
3 0 240 128 LP JA IOTAPEO BATAPE 
0 0340 128 0 IOPTPNO = PTPUNCH 
0 0193 0 0 CSHBSCO ——-HSI1 
0 0193 0 0 CSHBSCO -HSI2_ 
0 0193 0 0 CSHBSCO —-HSI3 
0 0193 0 0 CSHBSCO -HSI4 
0 0160 10 ?? 40 20 JAID IOTERMO CONSOLE 
10160 11 2? 40 21 JAID IOTERMO TERM 
20160 11 ?? 40 22 JAID IOTERMO TERM 
3.0160 11 2? 40 23 JAID IOTERMO TERM 
4 0160 i1 2? 40 24 JAID IOTERMO TERM 
5 0161 11 2? 40 25 JAID RMO TERM 
0 0170 0 0 TOINPO = INP1 
0 0173 0 0 IOINPO —sINP2 
0 0 180 0 0 CSSBSCO SSLC2 
0 0410 128 0 1ODSO HDS 1 
0 0410 128 0 IODSO HDS2 
0 0410 128 OO IODSO HDS3 
0 0410 128 0 IODSO HDS4 
0 0160 ?? ?? 40 60 J ID IODSTRMO DSTERM 
0 0160 ?? ?? 40 61 J ID IODSTRMO DSTERM 
0 0160 ?? ?? 40 62 J ID IODSTRMO DSTERM 
0 0160 ?? 2? 40 63 J ID IODSTRMO DSTERM 
0 0160 ?? ??2 40 64 J ID  IODSTRMO DSTERM 
0 0160 ?? 2? 40 65 J ID DSTERM 
0 041 1 128 0 DSLINE1 
0 041 1 128 0 DSLINE2 
0 0160 ?? 2? 40 68 JID ¢ 6 INPt 
0 0160 ?? 2? 40 69 J ID IODSTRMO INP2 
0 0410 2? 128 0 I0DSO SDS1 
0 0160 ?? 2? 36 71 J ID IODSTRMO DSTERM 





Figure 2-6. Sample I/O Device Table (Telephone Line with INP) 
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Opening a Line 


If you have only one communications interface configured into your system, there is no question about 
which name or number to specify in a :DSLINE command. If there is more than one communications 
interface, however, you must know (or ask someone who knows) which interface is connected to the 
physical line you want to use. 


Specifying an X.25 Line 

When specifying an X.25 line, you do not use the 1/O device table. This is because X.25 uses node 
names, rather than LDEVs, to specify devices. To find out what node names are configured on your 
system, type the following: 

:RUN NETCONF.PUB.SYS 


LIST 


See the DSN/DS HP 3000 to HP 3000 Network Administrator Manual for more information on 
NETCONF. 


:DSLINE 


The DSLINE Command 


The format of the :DSLINE command, as used to open a line, is presented here. In addition to opening 
a hardwired line or a telephone line, this command can also be used for closing one or more 
communications lines (see page 2-50). 


SYNTAX 


:DSLINE dsdevice [;LINEBUF=buffersize] 
[ ;EXCLUSIVE ] 
[ ;COMP] 
[ sNOCOMP ] 
[ ;QUIET] 


[ ; PHNUM=tel ephonenumber | 

[; LOCID=Localidsequence | 
[;REMID=remoteidsequence[,...remoteidsequence] | 
[;SELECT=selectionsignal sequence] 

[;OPEN] 





PARAMETERS 


The parameters that pertain to opening a line follow: 


dsdevice This is the device class name or logical device number assigned to the 
DSN/DS communications driver (IODSO) during system configuration, or a 
logical node name associated with the DSN/X.25 communications driver 
(IODSX) during network configuration. This parameter indirectly specifies 
which communications interface you wish to use. 


For X.21, you can specify a node rather than a DS device. DS will first 
determine if a valid LDEV or device class name was given. If that is not 
the case, DS will search the configuration data base to determine if it is a 
node name. 


NOTE 


DSN/X.25 users should always use a node name rather 
than a line identifier. The logical node name (mentioned 
in the dsdevice parameter description) appears in the 
configuration file, NETCON, for a Public Data Network 
(PDN). A Remote Node (RN) table entry relates the 
logical node name (specified in this command) to the 
logical device number of the appropriate IODSX driver 
(the X.25 driver), and to the PDN address of the 
destination node. 
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buf fer-size 


EXCLUSIVE 
COMP 


NOCOMP 


QUIET 


A decimal integer specifying the size (in words) of the DSN/DS line buffer 
to be used in conjunction with the communications line. The integer must 
be within the range 304 < buffer-size < 4095 when used with the SSLC 
or HSI, or within the range 304 < buffer-size < 1024 when used with 
the INP. The default value is the buffer size entered in response to the 
PREFERRED BUFFER SIZE prompt during system configuration. This 
parameter overrides the MPE configured value when specified by the first 
user to open the given line. If you are using X.25, this parameter is 
ignored. 


This parameter, if present, specifies that you want exclusive use of the 
communications line. If the requested line or specified communications 
interface is already open and you have specified the EXCLUSIVE option, 
DSN/DS will deny you access to the line (you cannot open it). (See "Line 
Opening Failures" later in this section.) Opening an EXCLUSIVE line 
requires the user to have CS and ND capabilities. 


By using this parameter, you can override the current system default, which 
was set at configuration time (see Section | of the DSN/DS 3000 Network 
Administrator Manual) or set by the system operator (see Section 9), and 
activate data compression. In this way, the mode of operation is set for 
your subsequent DS activity. This parameter does not affect other users 
sharing the line. 


This parameter deactivates the data compression mode. 
When you issue the :DSLINE command with this parameter added, the 
message identifying the DS line number is suppressed. The messages 


associated with the subsequent REMOTE HELLO and REMOTE BYE commands 
will also be suppressed. 
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The additional parameters that pertain only to opening a telephone line are as follows: 


telephone-number 


local-id-sequence 


remote-id-sequence 


SELECT 


A telephone number consisting of digits, dashes, and special characters. The 
permitted special characters are: 


0 through 9 


/ (separator used for automatic call units that have a second dial tone 
detect) 


E (optional end-of-number indicator) 


D(one-second delay. Used for European modems and automatic call units 
that require built-in delays) 


# (defined by the local telephone system) 
# (defined by the local telephone system) 


The maximum length permitted (including both digits and dashes) is 30 
characters. Provided that YES was entered in response to the DIAL 
FACILITY prompt during system configuration, this telephone number will 
be displayed at the operator’s console of your HP 3000 and the operator 
will then establish the telephone connection by dialing that number at the 
modem. (When the autodial feature is present in your system, the number 
provided here is dialed automatically.) The default telephone number is the 
one entered in response to the PHONE NUMBER prompt during system 
configuration. 


A string of ASCII characters contained within quotation marks. If you 
wish to use a quotation mark within an ASCII string, use two successive 
quotation marks. The maximum number of ASCII characters allowed in 
the string is 16. 


The supplied string of ASCII characters defines the ID sequence that will be 
sent from your HP 3000 to the remote HP 3000 when you attempt to 
establish the telephone connection. The default value is the ASCII string 
entered in response to the LOCAL ID SEQUENCE prompt during system 
configuration. 


Same format as Local-id-sequence. 


The supplied strings of ASCII characters define those remote HP 3000 ID 
sequences that will be considered valid during an attempt to establish the 
telephone connection. If the remote HP 3000 does not send a valid ID 
sequence, the telephone connection is terminated. The default set of 
remote ID sequences consists of the ASCII strings entered in response to the 
REMOTE ID SEQUENCE prompt during system configuration. 


The SELECT parameter is the equivalent of PHNUM for X.21 switched lines. 


The selection-signal-sequence, SELECT’s equivalent of a phone 
number, must be a string of 1 to 30 alphanumeric and/or special 
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characters. It must be delimited between two identical special characters. 
If the specified selection-signal-sequence is less than 30 characters, 
it will be padded at the end with blanks. The 
selection-signal-sequence can be given as one or more blanks to 
indicate you wish to use the direct dial facility. (You must subscribe to it 
through your X.21 network.) The SELECT parameter value takes 
precedence over that specified in the configuration data base. command is 
issued from a session. If another user is already queued, and you issue a 
:DSLINE command that allows queueing, a message will be printed telling 
you that you are queued behind a previous request. 
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Dialing the Remote Computer 


When you are opening a telephone line, you may supply a telephone number as an optional parameter 
in the :DSLINE command to be dialed at the modem connected to the specified interface. If you 
supply a telephone number, DSN/DS displays a message on the system console telling the operator to 
dial that number. The operator, after dialing the specified number, enters YES or NO through the 
system console =REPLY command to let DSN/DS know whether or not the telephone connection was 
successfully made. If the operator enters YES, DSN/DS proceeds with the exchanging of ID sequences. 
If the operator enters NO, your :DSLINE request is denied (you cannot open the line). In either case, 
your terminal’s keyboard is disabled until the console operator responds. 


If you do not supply a telephone number, the sequence of events is as described in the above 
paragraph, except that DSN/DS uses (by default) the first telephone number in the PHONELIST 
established during system configuration. 


If you do not supply a telephone number and no PHONELIST was established during system 
configuration, an I/O request message is displayed at the system console, but it does not include the 
number to be dialed. This method might be used when you will dial the remote HP 3000 yourself. 
Remember, however, that the console operator must still know whether you dialed successfully, since 
he must respond to the console message before you are granted access to the line. Because your 
terminal’s keyboard is disabled until the console operator responds with YES or NO, it is recommended 
that you always supply a telephone number in the :DSLINE command. 


ID Sequences 


Once a telephone connection to a remote HP 3000 exists, the two computers exchange ID sequences 
with one another. Within the context of DSN/DS, an ID sequence is a string of up to 16 ASCII or 
EBCDIC characters, or octal or hexadecimal numbers, that identifies a particular computer. 


During system configuration, each HP 3000 can be assigned a local ID sequence and a list of remote 
ID sequences. The local ID sequence identifies the particular HP 3000 in which it is established; the 
remote ID sequences identify those remote computers with which a communications link can be 
established over the public telephone network. 


In the :DSLINE command, you can supply (as optional parameters) a local ID sequence and one or 
more remote ID sequences to be used instead of those established during system configuration. (See 
Figure 2-9.) 


When a telephone connection is established between your HP 3000 and a remote HP 3000, the local 
ID sequence supplied in your :DSLINE command is transmitted to the remote system. Then the 
remote system transmits its local ID sequence over the telephone line to your HP 3000. The received 
ID sequence is then compared against the remote ID sequence(s) supplied in your :DSLINE command. 
If that ID sequence is found to be valid, the telephone connection is considered successful and DSN/DS 
grants you access to the line. If the ID sequence received at either end of the line is not considered 
valid, your :DSLINE request is denied (you cannot open the line). 


If you do not supply any ID sequences, DSN/DS uses those established during system configuration. If 
no ID sequences were established during system configuration and you do not supply any, no local ID 
sequence is transmitted from your HP 3000 to the remote system and any remote ID sequence 
received is considered valid. 
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Multiple Users 


Within a DSN/DS environment, it is possible for several users at either end of the line to share access 
to the same physical communications line or for a single user at one end of the line to obtain exclusive 
access to the line. 


AS previously mentioned in the presentation of the :DSLINE command, the EXCLUSIVE parameter can 
be used to obtain exclusive access to the specified physical communications line. If you specify this 
parameter (and if access to the line is granted), no other user in either computer will be permitted to 
open that line until you close it. If you ask for exclusive access to a particular line and that line is 
already in use, DSN/DS denies your request (you cannot open the line). (See "Line Opening Failures" 
later in this section. ) 


For hardwired lines and for dial-up lines, multiple users at either end of the line can specify the same 
physical line in : DSLINE commands and obtain access to that line as long as none of them requests 
exclusive access. In such a case, the users’ data is multiplexed, so that each user’s access to the line 
appears to be completely independent of all others. The exception for a telephone line is that all users, 
other than the one who originally opened the line, specify (explicitly or by default) the currently 
active remote ID sequence. Figures 2-7 through 2-11 present annotated examples, illustrating 
successful and unsuccessful attempts by different users to obtain access to the same line. 
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SYSTEM A SYSTEM B 


LOCAL REMOTES REMOTE 

SESSION _~ a SESSION 

| SESSION 
~ 


REMOTE 
SESSION 





Figure 2-7. Multiple User Example 1 


>HELLO USER.X :HELLO USER.Y 
:DSLINE REMOTE3 :DSLINE REMOTE3 
:REMOTE HELLO USER.X :REMOTE HELLO USER.Y 


In this example, User X initiates a local session in System A, obtains access to the hardwired 
communications line that connects System A to System B, and initiates a remote session in System B. 
User Y subsequently initiates a local session in System A, obtains access to the same communications 
line, and initiates a remote session in System B. The request by User Y for the particular 


communications line is granted by DSN/DS because neither user asked for exclusive access to the 
line. 
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SYSTEM A SYSTEM B 


LOCAL REMOTES REMOTE 
SESSION We ee cece NE ale es te i gees ttre -“— SESSION 
| \ SESSION 


~ 














Figure 2-8. Exclusive Option Example 


sHELLO USER.X :HELLO USER.Y 


:DSLINE REMOTE3 ;EXCLUSIVE :DSLINE REMOTE3 


:REMOTE HELLO USER.X 


In this example, User X initiates a local session in System A, obtains exclusive access to the 
hardwired communications line that connects System A to System B, and initiates a remote session in 
System B. User Y subsequently initiates a local session in System A and requests access to the same 


communications line. The request is denied by DSN/DS because User X already has exclusive access 
to the specified line. DSN/DS responds with: 


e41 DS LINE IN USE EXCLUSIVELY OR BY ANOTHER SUBSYSTEM. (DSERR 241) 
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Configured Local ID: A Configured Local ID: B 
Configured Remote IDs: B,C Configured Remote IDs: A,C 
SYSTEM A SYSTEM B 
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Figure 2-9. Dial-up Line Multiple User Example 1 


>HELLO USER.X :HELLO USER.Y 

:DSLINE REMOTE2 & :DSLINE REMOTE2 & 
3; PHNUM=555-1234 & ; PHNUM=555-1234 & 
;REMID="B" ;REMID="B" 


:REMOTE HELLO USER.X :REMOTE HELLO USER.Y 


In this example User X initiates a local session in System A and obtains access to the line identified 
by the device class name REMOTE2. The supplied telephone number is displayed at the system 
console of System A. The console operator establishes the telephone connection by dialing the 
number at the modem connected to the particular line and then enters YES through the system 
console to let DSN/DS know that the telephone connection was successfully made. The two 
computers exchange their configured local ID sequences. System A compares the received ID 
sequence (B) against the remote ID sequence specified by User X (REMID="B"). Since the received 
ID sequence is found to be valid, the telephone connection is allowed to remain in effect. User X 
then initiates a remote session in System B over the telephone line from his local log-on terminal. 


User Y subsequently initiates a local session in System A and requests access to the same line 
(REMOTE2). Since that line is already open, DSN/DS ignores the supplied telephone number (no 
message is displayed at the system console). Access to the currently opened line is granted to User Y 
because neither user requested exclusive access and User Y specified the currently active remote ID 
sequence (REMID="'B") in the :DSLINE command. 


Lr 25 


Opening a Line 


Configured Local ID: A Configured Local ID: B 


Configured Remote IDs: B,C Configured Remote IDs: A,C 


SYSTEM A SYSTEM B 


REMOTE2 





Figure 2-10. Dial-up Line Multiple User Example 2 


>HELLO USER. X >HELLO USER.Y 

:DSLINE REMOTE2 & :DSLINE REMOTE2 & 
; PHNUM=555-1234 & ; PHNUM=555-2001 & 
3REMID="B" ;REMID="C" 


:REMOTE HELLO USER.X 


In this example User X initiates a local session in System A and obtains access to the line identified 
by the device class name REMOTE2. The supplied telephone number is displayed at the system 
console of System A. The console operator establishes the telephone connection by dialing the 
number at the modem connected to the particular line and then enters YES through the system 
console to let DSN/DS know that the telephone connection was successfully made. The two 
computers exchange their configured local ID sequences. System A compares the received ID 
sequence (B) against the remote ID sequence specified by User X (REMID="B"). Since the received 
ID sequence is found to be valid, the telephone connection is allowed to remain in effect. User X 
then initiates a remote session in System B over the telephone line from his local log-on terminal. 


User Y subsequently initiates a local session in System A and requests access to the same line 
(REMOTE2). Since that line is already open, DSN/DS ignores the supplied telephone number, and no 
message is displayed at the system console. The request is denied by DSN/DS because the specified 
line is already open and User Y did not specify the currently active remote ID sequence (B) in his 
:DSLINE command. DSN/DS responds with: 


255 COMMUNICATIONS INTERFACE ERROR. UNANTICIPATED CONDITION. (DSERR 255) 
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Configured Local ID: (none) Configured Local ID: (none) 
Configured Remote IDs: (none) Configured Remote IDs: (none) 
SYSTEM A SYSTEM B 
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Figure 2-11, Dial-up Line Multiple User Example 3 


>HELLO USER.X :HELLO USER.Y 
:DSLINE REMOTE2 ;PHNUM=555- 1234 :DSLINE REMOTE2 ;PHNUM=555-1234 
:REMOTE HELLO USER.X :REMOTE HELLO USER.Y 


In this example User X initiates a local session in System A and obtains access to the line identified 
by the device class name REMOTE2. The supplied telephone number is displayed at the system 
console of System A. The console operator establishes the telephone connection by dialing the 
number at the modem connected to the particular line and then enters YES through the system 
console to let DSN/DS know that the telephone connection was successfully made. No ID sequences 
are exchanged because none were established (in either HP 3000) during system configuration and 
User X didn’t specify any in the :DSLINE command. User X then initiates a remote session in 
System B over the telephone line from his local log-on terminal. 


User Y subsequently initiates a local session in System A and requests access to the same line 
(REMOTE2). Since that line is already open, DSN/DS ignores the supplied telephone number (no 
message is displayed at the system console). Access to the currently opened line is granted to User Y 
because neither user requested exclusive access and User Y specified the currently active remote ID 
sequence (in this case none) in his : DSLINE command. 
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NOTE 


When no ID sequences are configured and the users don’t 
supply any in their :DSLINE commands, both are taking 
it on faith that they are connected to the proper remote 
computer. In this example, if User Y had specified 
PHNUM=555-2001, DSN/DS would have ignored this 
telephone number because the line is already open. User 
Y would have been connected to the currently active 
remote computer rather than the requested remote 
system. The total absence of configured or supplied ID 
sequences is safe only under very controlled 
circumstances. It is strongly recommended that all 
computers in a DSN/DS network that are capable of 
communicating over telephone lines have default local 
and remote ID sequences established during system 
configuration and that all line users specify the ID 
sequence of the desired remote computer (REMID=x) in 
their :DSLINE commands. 
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The REMOTE HELLO Command 


Once you have obtained access to a physical communications line using the :DSLINE command, you 
use the :REMOTE HELLO command to actually establish the communications link. The :REMOTE 
HELLO command initiates a remote session on your behalf in the HP 3000 connected to the other end 
of the communications line. 


The format of the :REMOTE HELLO command is presented here. Notice that, except for the two 
shaded items, it has exactly the same format as the standard MPE HELLO command. 


Because the :REMOTE HELLO command is initiating a session for you in a remote HP 3000, the 
parameters in that command specify information which pertains to the operating environment of the 
remote HP 3000 (not your local one). More specifically you must keep the following in mind: 


sesstonname (if present) identifies the remote session and has no relationship to your local 
session. 


username, accountname, groupname, and their passwords (if any) must all be valid as defined 
by the accounting structure of the remote HP 3000. 


epusecs (if present) refers to central-processor time in the remote system. 


BS, CS, DS, ES, INPRI, and HIPRI (if present) all specify priorities for the remote session 
within the remote system. 


termt ype (if present) has no meaning and is ignored because the output from the remote session 
is directed to your local log-on terminal. The termtype parameter for your local session 
implicitly defines your log-on terminal type for any remote sessions that you initiate. 


SYNTAX 


HELLO [sessionname, ]username[/userpass] .aeetname[/aectpass] 
[ ,groupname[/grouppass] ] 


[;TERM=termt ype] 
[;TIME=cpusecs] 
BS 
CS 


DS 
ES 


[;PRI= 


; INPRI=inputpriortity 
;HIPRI 
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PARAMETERS 


sesstionname 


asername 


USerpass 


acctname 


acetpass 


groupname 


grouppass 


termt ype 


Arbitrary name used in conjunction with username and acctname 
parameters to form a session identity. Contains from 1 to 8 alphanumeric 
characters, beginning with a letter. Default is that no session name is 
assigned. 


A user name, established by the account manager, that allows you to log on 
under this account. Contains from | to 8 alphanumeric characters, 
beginning with a letter. 


(Required parameter. ) 


User password, optionally assigned by the account manager. Contains from 
1 to 8 alphanumeric characters, beginning with a letter. 


Name of account, as established by the account manager. Contains from 1 
to 8 alphanumeric characters, beginning with a letter. The acetname 
parameter must be preceded by a period. 


(Required parameter. ) 


Account password, optionally assigned by the system manager. Contains 
from | to 8 alphanumeric characters, beginning with a letter. 


Name of the group to be used for local file domain and CPU time charges. 
Established by the account manager. Contains from | to 8 alphanumeric 
characters, beginning with a letter. Default is your home group, if you are 
assigned one by the account manager. 


(Optional if you have a home group; required if a home group has not been 
assigned. ) 


Group password, optionally assigned by the account manager. Contains 
from 1 to 8 alphanumeric characters, beginning with a letter. 


(Required if assigned and you are logging on under other than your home 
group; optional if you are logging on under your home group.) 


Ignored. The TERM=termtype parameter of the HELLO command that 
initiated the local session also implicitly defines the log-on terminal type 
for any remote sessions initiated from the local session. 


cpusecs 


BS, CS, DS, ES 


inputpriority 


HIPRI 


dsdevice 


-REMOTE HELLO 


Maximum CPU time that the session can use, entered in seconds. When the 
limit is reached, the session is aborted. Must be a value from | to 32767. 
To specify no limit, enter a question mark (?) or UNLIM, or omit the 
parameter. Default is no limit. 


Execution priority class. BS is highest priority; ES is lowest. If you specify 
a priority that exceeds the highest permitted priority for your account or 
user name by the system, MPE assigns the highest priority possible below 
BS. Default is CS. 


NOTE 


DS and ES are used primarily for batch jobs. Their use 
for sessions is discouraged. 


Relative input priority used in checking against access restrictions imposed 
by the jobfence, if one exists. Takes effect at log-on time. Must be a value 
from 1 (lowest priority) to 13 (highest priority). If a value is specified that 
is less than or equal to current jobfence set by the console operator, the 
session is denied access. Default is 8 or 13, depending upon the System 
Logging options in effect. 


Request for maximum session-selection input priority, causing the session to 
be scheduled regardless of current jobfence or execution limit for sessions. 
This parameter can be specified only by users with System Manager or 
System Supervisor capability. (If not, the system tries to log you on with 
INPRI=13.) Default is the current jobfence and execution limit. 


The device class name or logical device number assigned to the DSN/DS 
communications driver (IODSO) during system configuration, or a logical 
node name associated with the DSN/X. 25 communications driver (IODSX) 
during network configuration using NETCONF. This parameter, if present, 
specifies which line you wish to use. 


(Optional parameter if a line is already open; otherwise it is required. ) 


NOTE 


DSN/X. 25 users should always use a node name rather 
than a line identifier. 
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So far, we have been talking entirely about the :DSLINE and :REMOTE HELLO commands being used 
in conjunction with one another: the :DSLINE command obtaining access to a physical line and the 

:>REMOTE HELLO command actually establishing the communications link by initiating a remote 
session over the acquired line. As you may have guessed from the above parameter definitions, the 

:DSLINE parameter of the : REMOTE HELLO command gives you a new, and simpler, way to obtain a 
line and establish a communications link. If you are satisfied to use the default DSN/DS line buffer 
size and you do not need exclusive use of the line, you can acquire a line and initiate a remote session 
over that line by using a single command: a :REMOTE HELLO command with the :DSLINE parameter. 
If you open a line in this way, however, it remains open only for the duration of the particular remote 
session (when the remote session is terminated the line is automatically closed). If, on the other hand, 
you use the :DSLINE command to open a line, the line remains open for the duration of the local 
session (or until you explicitly close the line). 


To illustrate this, look again at the example in Section 1. In that example, the :DSLINE command was 
used to obtain access to the hardwired line REMOTE] and the :REMOTE HELLO command was used to 
initiate a remote session over the line: 

:DSLINE REMOTE1 

DS LINE NUMBER = #L3 

:REMOTE HELLO RUSER.RACCOUNT 

HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 9:08 AM 


WELCOME TO SYSTEM B. 


e 
° 


NOTE 


In this case, the acquired line remains open when the 
remote session is terminated. 
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By including the :DSLINE parameter in the :REMOTE HELLO command, essentially the same 
operations could be performed while using a single command, as follows: 


:REMOTE HELLO RUSER.RACCOUNT ; DSLINE=REMOTE1 
DS LINE NUMBER = #L3 


HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 9:08 AM 


WELCOME TO SYSTEM B. 


NOTE 


In this case, the acquired line is closed when the remote 
session is terminated. 


These same examples can be followed when you use a dial-up line. However, the telephone line will 
work properly for you only under the following very limited circumstances: 


e You must be satisfied to use the default DSN/DS line buffer size established during system 
configuration. 


e The default ID sequences established in both computers during system conf iguration must 
properly identify both your local HP 3000 and the desired remote HP 3000 (or no ID sequences 
were established during system configuration in either computer). 


e You must dial the remote computer yourself at the local system modem, or the line must be 
connected to, and configured for, autodialing. Note that if you cannot successfully make the 
telephone connection you cannot abort the :REMOTE HELLO command; the command will be 
rejected by DSN/DS if no connection is established within 15 minutes, unless another value was 
specified at configuration time. 


The likelihood of all of the above conditions existing for a particular use of DSN/DS is rather slim. In 
most DSN/DS environments you will want to explicitly define the ID sequence of the desired remote 
computer to guarantee that the proper connection is established, and you will want to provide a 
telephone number so that you can let DSN/DS know immediately if a telephone connection cannot be 
made. (It is not acceptable to tie up a communications interface and your log-on terminal waiting for 
an unsuccessful :DSLINE or :REMOTE HELLO request to be rejected.) 
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Opening Multiple Lines 


Within your local session, you can open more than one physical communications line and you can have 
remote sessions active concurrently over all of the opened lines. However, when operating without 
DSN/X. 25, you are limited to one remote session per physical line at any given time. 


If access to the specified line is obtained, DSN/DS responds to each :DSLINE command by displaying a 
DS line number at your log-on terminal. This line number is roughly analogous to the file number 
returned by the MPE FOPEN intrinsic, in that it is an arbitrary number that uniquely identifies 
(within your local session) your current access to a particular communications line. It has no 
relationship to the logical device number or any other configuration parameter associated with the 
line. DS line numbers are meaningful only if you have more than one line open concurrently within a 
single local session. In that case, you are assigned a separate DS line number for each line you have 
opened, and you subsequently use these numbers to specify which line you wish to use for a given 
remote command (or sequence of remote commands) or to close a particular line without closing the 
others. 


Figure 2-12 illustrates a situation where a user has established two hardwired communications links 


concurrently from within a single local session. Take a closer look at that situation and examine the 
sequence of commands that was used to create it. 


SYSTEM A REMOTES SYSTEM B 
y (DS Line number 3) 


LOCAL REMOTE 
SESSION Jf —-4{ —— — a — —\_SESSION 



















Log-on 
Terminal 






SYSTEM C 


| — —. \_SESSION 





Figure 2-12, Multiple Line Example (Hardwired Lines) 
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First the user sat down at a terminal connected to System A and initiated a local session: 
:HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1 :37 PM 
WELCOME TO SYSTEM A. 
USER and ACCOUNT are valid user and account names, respectively, as defined by the accounting 
structure of System A. 


Now, we have the situation illustrated in Figure 2-13. Notice that, at this point, no communications 
link exists between any of the three systems. 


SYSTEM A REMOTES SYSTEM B 





Log-—on 
Terminal 


Figure 2-13. Initiating the Local Session 
(Hardwired Example) 
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Next, the user acquired access to a line between Systems A and B and initiated a remote session in 
System B: 

>DSLINE REMOTE3 

DSLINE NUMBER = #L3 

>REMOTE HELLO RUSER.RACCOUNT 

ee VOR. RAUVCOUN TL 

HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:38 PM 

WELCOME TO SYSTEM B. 
REMOTES is the device class name (as defined within System A) associated with the particular line. 
RUSER and RACCOUNT are valid user and account names, respectively, as defined by the accounting 
structure of System B. 
Now we have the situation illustrated in Figure 2-14. 


SYSTEM A REMOTES SYSTEM B 
J (DS Line number 3) 


REMOTE 
— eee ee _ SESSION 









REMOTE1 


SYSTEM C 






Log-on 
Terminal 


Figure 2-14, Establishing the Link With System B 
(Hardwired Example) 
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Finally, the user acquired access to a line between Systems A and C and initiated a remote session in 
System C: 


:DSLINE REMOTE1 

DS LINE NUMBER = #L4 

:REMOTE HELLO RUSER.RACCOUNT 

HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:39 PM 

WELCOME TO SYSTEM C 
REMOTE1 is the device class name (as defined within System A) associated with the particular line. 
RUSER and RACCOUNT are valid user and account names, respectively, as defined by the accounting 


structure of System C. 


We end up with the situation illustrated in Figure 2-15, which is identical to Figure 2-12 that started 
this example. 


SYSTEM A REMOTES SYSTEM B 
y (OS Line number 3) 


REMOTE 
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Log-on 
Terminal 





SYSTEM C 


REMOTE 
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Figure 2-15. Establishing the Link With System C 
(Hardwired Example) 


Opening a Line 


Figure 2-16 illustrates a situation where a user has established two telephone communications links 
concurrently from within a single local session. Take a closer look at that situation and examine the . 
sequence of commands that was used to create it. 


SYSTEM A REMOTE2 SYSTEM B 


J (DS Line number 3) 
SESSION coandiias oil muatianetiomationnstienntionntiontiony _ SESSION 
















Log-on 
Terminal 


SYSTEM C 


— — \_SESSION 


Figure 2-16, Multiple Line Example (Telephone Lines) 
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First the user sat down at a terminal connected to System A and initiated a local session: 
>HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:37 PM 
WELCOME TO SYSTEM A. 
USER and ACCOUNT are valid user and account names, respectively, as defined by the accounting 
structure of System A. 


At this point, we have the situation illustrated in Figure 2-17. Notice that, so far, no communications 
link exists between any of the three systems. 


SYSTEM A REMOTE2 SYSTEM B 


_ 






ae REMOTES 


User’s 
Log-on SYSTEM C 


- fo 


Figure 2-17, Initiating the Local Session 
(Dial-up Example) 


Opening a Line 


Next, the user acquired access to a telephone connection between Systems A and B and initiated a 
remote session in System B: 


:DSLINE REMOTE2 ;LOCID="A" ;REMID="B" ;PHNUM=555-8001 


DS LINE NUMBER = #L3 
REMOTE HELLO RUSER.RACCOUNT 





HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:38 PM 


WELCOME TO SYSTEM B. 


REMOTE2 is the device class name (as defined within System A) associated with the particular line, A 
and B are the ID sequences identifying Systems A and B, respectively, and 555-8001 is the telephone 
number of the modem connected to the communications interface at System B. RUSER and RACCOUNT 
are valid user and account names, respectively, as defined by the accounting structure of System B. 


Now we have the situation illustrated in Figure 2-18. 


SYSTEM A REMOTE2 SYSTEM B 
J (DS Line number 3) 


REMOTE 
ee _ SESSION 





User’s 
Log-on SYSTEM C 
Terminal 


Figure 2-18. Establishing the Link With System B 
(Dial-up Example) 
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Finally, the user acquired access to a line between Systems A and C and initiated a remote session in 
System C: 


:DSLINE REMOTE3 ;LOCID="A" ;REMID="C" ;PHNUM=377-2000 
DS LINE NUMBER = #L4 
:REMOTE HELLO RUSER.RACCOUNT 


HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:39 PM 


WELCOME TO SYSTEM C. 


REMOTES is the device class name (as defined within System A) associated with the particular line, A 
and C are the ID sequences identifying Systems A and C, respectively, and 377-2000 is the telephone 
number of the modem connected to the communications interface at System C. RUSER and RACCOUNT 
are valid user and account names, respectively, as defined by the accounting structure of System C. 


We end up with the situation illustrated in Figure 2-19, which is identical to Figure 2-16 that started 
this example. 


2-41 


Opening a Line 


SYSTEM A REMOTEZ SYSTEM B 
J (DS Line number 3) 


S 
SESSION So ape me se come eee em aero = SESSION 









Log—-on 
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SYSTEM C 


— — \_SESSION 





Figure 2-19, Establishing the Link With System C 
(Dial-up Example) 


2-42 


Opening a Line 


Figure 2-20 illustrates a situation where a user has established two X.25 communications links 
concurrently from within a single local session. Take a closer look at that situation and examine the 
sequence of commands that was used to create it. 









REMOTE 
—_ SESSION 


SYSTEM A 


SYSTEM C 


REMOTE 
— SESSION 


User’s 
Log-on 
Terminal 


Figure 2-20. Multiple Line Example (X, 25 Lines) 
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First the user sat down at a terminal connected to System A and initiated a local session: 
:HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:37 PM 
WELCOME TO SYSTEM A. 
USER and ACCOUNT are valid user and account names, respectively, as defined by the accounting 
structure of System A. 
At this point, we have the situation illustrated in Figure 2-21. Notice that, so far, no communications 


link exists between any of the three systems. 


SYSTEM B 






SYSTEM A 
LOCAL P D N 


| 
| 
| SYSTEM C 
| 
| 
| 





User’s 
Log-on 
Terminal 


Figure 2-21. Initiating the Locai Session 
(X.25 Example) 
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Next, the user acquired access to an X.25 connection between Systems A and B and initiated a remote 
session in System B: 


:DSLINE NODEB 
DS LINE NUMBER = #L3 
:REMOTE HELLO RUSER.RACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:38 PM 
WELCOME TO SYSTEM B. 
NODEB is the nodename (as defined within System A) associated with the particular line. RUSER and 


RACCOUNT are valid user and account names, respectively, as defined by the accounting structure of 
System B. 


Now we have the situation illustrated in Figure 2-22. 








SYSTEM B 


REMOTE 
= SESSION 


SYSTEM A 


SYSTEM C 


User’s 
Log—on 
Terminal 


Figure 2-22, Establishing the Link With System B 
(X.25 Example) 
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Finally, the user acquired access to a line between Systems A and C and initiated a remote session in 
System C: 


:DSLINE NODEC 
DS LINE NUMBER = #L4 
>REMOTE HELLO RUSER.RACCOUNT 


HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 1:39 PM 


WELCOME TO SYSTEM C. 


NODEC is the nodename (as defined within System A) associated with the particular line. RUSER and 
RACCOUNT are valid user and account names, respectively, as defined by the accounting structure of 


System C. 


We end up with the situation illustrated in Figure 2-23, which is identical to Figure 2-20 that started 
this example. 
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Figure 2-23, Establishing the Link With System C 
(X.25 Example) 
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Opening a Line 


Line Opening Failures 


There are several reasons why a :DSLINE command for opening a communications line might be 
rejected by DSN/DS, some of which have been illustrated earlier in this section. 


The following list summarizes the likely causes of a line opening failure that are common to lines in 
general: 


e You made a syntax error in the :DSLINE command. 

e You gave an erroneous line or node name specification (dsdevice) in the :DSLINE command. 
(There is no IODSO entry in the system configuration with the specified device class name or 
logical device number, or the remote node name you specified was not defined in the network 
configuration database). 

@ The line was not opened by the local console operator. 

e The line was not opened by the remote console operator. 


e The remote operator may have lowered the session LIMIT. 


o The local console operator may have used the SLAVE option to limit DS activity to incoming users 
only. 


e The remote console operator may have used the MASTER option to prohibit access to the system. 


e All virtual terminals on the remote system are already in use, which means there are no remote 
resources available for you to establish a remote session. 


e All virtual circuits are in use (X.25 only). 
e Someone has exclusive access to the specified line. 
e You asked for EXCLUSIVE access to a line that is in use. 


e DSN/DS detected a hardware problem (the communications interface board is not responding 
correctly). 
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The following list summarizes the additional causes of a line opening failure on a dial-up telephone 
line: 


® The operator was not able to make the requested telephone connection and entered NO through 
the system console in response to the dial request message. 


e The remote computer rejected your local ID sequence. 
e The remote computer did not send a valid ID sequence (the received ID sequence did not match 
any of the remote ID sequences that you specified or, if you didn’t specify any, did not match any 


of the configured remote ID sequences). 


e The specified line is already in use and the remote ID sequence you supplied did not match the 
one used by the currently connected remote HP 3000. 


The various error numbers and messages that might appear asa result of line opening failures are 
included in the summary of error codes and messages in Appendix A. 
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Closing a Line 


Once you have opened one or more communications lines, you can close any or all of them by using a 
variation of the :DSLINE command. The line closing format of the :DSLINE command is presented 
here. 


SYNTAX 


dsdevice 
:DSLINE <dslineNumber 3CLOSE 
@ 





PARAMETERS 

dsdevice The device class name, logical device number, or logical node name specified 
in the :DSLINE command that opened a particular line. 

dslineNumber The DS line number assigned to you by DSN/DS when the particular line 
was opened. When this parameter is used, it must appear in the format 
#Ln, where n is the line number (see "Examples" on the following page). 

@ This parameter specifies that you wish to close all of the lines that you 
currently have open. 

3;CLOSE This parameter specifies that you wish to close the specified line(s). 


If no line identifier (dsdevice, dslineNumber, or ®) is specified, DSN/DS closes the line that you 


most recently opened. 
NOTE 


When the last node issues a :DSLINE CLOSE command, 
the message CS I/O ERROR will appear on the remote 
console. This is normal, and should be ignored. 
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Examples 


The following examples illustrate the variations of the :DSLINE command that can be used for closing 
one or more communications lines. 


:DSLINE REMOTE3 ;CLOSE 
This form closes the line that is identified by the device class name REMOTES. 


:DSLINE 55 ;CLOSE 
This form closes the line that is identified by the logical device number 55. 


:DSLINE @ ;CLOSE 
This form closes all the lines that you currently have open. 


;DSLINE #L3 ;CLOSE 
This form closes the line that is identified by #L3. 


:DSLINE ;CLOSE 
This form closes the line that you most recently opened. 


If you are sharing one or more physical communications lines with other users, the above forms of the 
* DSLINE command close the line(s) for your application only (the other user’s applications are not 
affected). 


SECTION 


A communications link exists after you have initiated a session in the remote HP 3000 under the 
username, accountname, and groupname specified in the : REMOTE HELLO command. You now have 
two distinct sessions in existence simultaneously from the same log-on terminal: a local session (in the 
HP 3000 to which you first logged on) and a remote session (in the HP 3000 at the other end of the 
communications line). 


REMOTE SESSIONS 





Within the local session, you have access to all I/O devices and disc files in your local HP 3000 (subject 
to the usual MPE file security, of course). This is a normal MPE interactive session in every respect. 
You enter MPE commands and use the various language and utility subsystems exactly as you would if 
DSN/DS were not present. This local session is running under the username, accountname, and 
groupname specified in the : HELLO command that you used to first log on. All user capabilities and 
file access available to you within the local session are determined by those log-on parameters. 


Within the remote session, you have access to all I/O devices and disc files in the remote HP 3000 
(again, subject to the usual MPE file security). With the few minor exceptions described in the 
following pages, this is also a normal MPE interactive session. All MPE commands and subsystems are, 
however, executed in the remote HP 3000. The terminal output resulting from the executed 
commands and subsystems appears at your local log-on terminal. The remote session is running under 
the username, accountname, and groupname specified in the :REMOTE HELLO command that you used 
in establishing the communications link. All user capabilities and file access available to you within 
the remote session are determined by those log-on parameters. 


For the sake of clarity and as a learning aid, the remainder of this section will treat local and remote 
sessions as separate (and essentially unrelated) entities that use only those resources available in the 
particular HP 3000 in which they are running. Actually, it is possible to access the I/O devices and 
disc files of the remote HP 3000 computer from your local session, and it is also possible to access the 
1/O devices and disc files of the local HP 3000 from your remote session. This more advanced activity 
will be covered in Section 4, "Remote File Access." 


ISSUING REMOTE COMMANDS 


Remember that, in the previous sections, the following sequence of commands was used to establish the 
communications link: 


RETURN HELLO command 
>HELLO USER. ACCOUNT and log-on 
display for 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 9:05 AM local session. 


WELCOME TO SYSTEM A. 
:DSLINE REMOTE2 
DS LINE NUMBER = #L3 


Remote Sessions 


HELLO command 


:REMOTE HELLO RUSER.RACCOUNT and log-on 
display for 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 9:06 AM remote session. 


WELCOME TO SYSTEM B. 


At this point, the remote session has been initiated, but you are currently in the local session (as 
signified by the colon prompt character). To execute a command in the remote session, use the 
following construct: 


:REMOTE [xxx] command 


where xxx is the DS line number returned by DSN/DS when the communications line was opened, 
and command is the desired MPE command in its normal format. (The DS line number is necessary 
only if you have more than one communications line open simultaneously; if it is omitted, then the 
line which you most recently opened is referenced by default). In the example in Section 1, this 
construct was used to execute a LISTF command, as follows: 


:REMOTE LISTF 
FILENAME 


DATA1 DATAS DATA6 FILE3 SOURCE 1 


e 
e 


Because the prefix REMOTE was included, the LISTF command is executed in the remote session (the 
implied account and group names are those established by the :REMOTE HELLO command that 
initiated the remote session). Although the LISTF command is executed in the remote HP 3000, the 
output generated by the command is displayed at your local log-on terminal. 


Notice, in the above example, that the DS line number associated with the particular communications 
line was not specified (3 in this example). This is because, if no line number is specified, DSN/DS uses 
(by default) the line most recently opened. Only one communications line is open from your local 
session; so DSN/DS uses that line by default. If you had opened a second line, you would need to tell 
DSN/DS in which remote computer the remote command is to be executed. To tell DSN/DS, include 
the appropriate DS line number in the remote command, as follows: 


>REMOTE 3 LISTF 

FILENAME 

DATA1 DATAS DATAG FILE3 SOURCE 1 
The above construct only allows you to execute a single remote command. After the remote command 
has been executed, control returns to your local session (as signified by the colon prompt character). 
But suppose that you want to execute a whole series of remote commands. It would obviously be a 
nuisance to have to prefix each command with the word REMOTE. DSN/DS provides a convenient 


solution to this situation. To execute a series of commands in the remote session, use the following 
construct: 


Sra 


Remote Sessions 


:REMOTE [xxx] 


where xxx is again the DS line number of the desired communications line (specifying in which 
remote HP 3000 you want to execute commands). DSN/DS then prompts you for each command by 
displaying a # in column | of your terminal ( in place of the standard MPE colon prompt). In the 
example in Section 1, this construct was used for entering two remote MPE commands, EDITOR and 
BYE. 


After reviewing the example in Section 1, try another example that uses more than those two remote 
commands: 


: REMOTE 
#LISTF 





FILENAME 


DATA1 DATAS DATAS FILE3 SOURCE 1 
#PURGE DATAS 

#PURGE DATAG 

#LISTF 


FILENAME 


DATA1 FILE3 SOURCE 1 
#RUN FCOPY.PUB.SYS 


HP32212A.0.03 FILE COPIER 


>FROM=DATA1 ;TO=DATA2 ;NEW 
EOF FOUND IN FROMFILE AFTER RECORD 679 


680 RECORDS PROCESSED **#* O ERRORS 
>EXIT 


END OF PROGRAM 
#LISTF 


FILENAME 


DATA1 DATA2 FILE3 SOURCE1 
#BYE 


CPU=4. CONNECT=7. WED, MAR 3, 1982, 9:13 AM 
#; 


Notice that except for the # prompt (in place of the standard colon prompt) this looks exactly like a 
normal MPE interactive session. All of the commands shown in the previous example are entered 
through the local log-on terminal, but the MPE and FCOPY commands are executed in the remote 
session within the remote HP 3000. After each remote MPE command was executed, however, control 
remained in the remote session (as signified by the # prompt character). When the remote session was 
terminated and the user typed a colon (:) in response to the # prompt following the log-off message, 
control was then returned to the local session (as signified by the colon prompt). 
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Using the Remote Subsystem from a Batch Job 


While in a batch job, you can establish a remote session by using the :DSLINE or :REMOTE HELLO 
command. 


The job to be streamed may be similar to the following: 


:JOB USER. ACCOUNT 
:DSLINE REMOTE2 
:REMOTE HELLO RUSER.RACCOUNT 
>REMOTE 

#F ILE OUT;DEV=LP 
#BUILD WORK;DISC=50 
#RUN USERPROG 
#PURGE WORK 

#: 

:REMOTE BYE 
:DSLINE;CLOSE 

:EOJ 


NOTE 


The remote # prompt is optional. 


An important point to remember is that, once established, the remote session is interacting with the 
job in the same way as it would interact with a terminal. If the remote session detects an error, the 
error is printed to $STDLIST. If the error generates a user prompt, the next record in the job file is 
read as the response (in the same manner as waiting for a character or on a terminal). The 
record is then lost to the job. 


The Key 

Within a remote session, you can use to temporarily interrupt remote processing. When doing 
so, either you may return control to the MPE Command Interpreter of your local HP 3000, or you 
may temporarily suspend the remote subsystem that you are executing without returning control to 
the local HP 3000. This is determined by how you execute commands in the remote session. There 
are two ways to execute commands in a remote session: 


e By prefixing each command with the word REMOTE. 


e By entering the word REMOTE, which prompts you for each command. 


Prefixing Each Command with REMOTE. 


When you are conducting a remote session by prefixing each command with the word REMOTE, 
pressing returns control to the local Command Interpreter and you receive the colon ( :) 
prompt. To continue remote processing at the point where it was interrupted, you merely enter 
REMOTE RESUME in response to the local MPE colon prompt. 
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As an example, assume that you are in the midst of using the text editor in a remote session when you 
decide to start a job stream executing concurrently in your local HP 3000. The sequence of 
commands would be similar to the following: 


:REMOTE EDITOR 


HP32201A.7.05 EDIT/3000 FRI, MAY 9, 1980, 9:11 AM 
(C) HEWLETT-PACKARD CO. 1979 




















/aDD 
1 DOE, JOHN 29 M CHI 
@ BLACK, PATRICIA 23: FS 
3 SIMON, NEIL 43 M NY 
4 MACK, SHIRLEY 38 F DET 
5 
Local cs ere pressed here. 
session 
prompt. 
:STREAM COBTEST1 Control is now 
#319 in the local 
:REMOTE RESUME session. 
READ pending Control is now 
MICHAELS, WILLIAM 32 M CHI back in the 
6 O’LEARY, TIMOTHY — 49 M DET remote session. 
7 MARTIN, MARY 34 F LA 
8 MURIN, JOICE 42 F CHI 


Notice that when was pressed, the text editor in the remote HP 3000 was waiting for you to 
enter the text for line 5. interrupted the remote session and passed control to the MPE 
Command Interpreter of the local HP 3000 (as signified by the colon prompt). The STREAM command 
was issued within the local session, which caused the file COBTEST | to be executed in the local HP 
3000. Then, when the RESUME command was issued, control was passed back to the remote session at 
the point where it was interrupted (that is, the text editor in the remote HP 3000 is now waiting for 
you to enter the text for line 5). When the text for line 5 is entered, the remote session proceeds as 
though nothing had happened. 


Note that by the end of the example, the local job stream, the local session, and the remote session are 
all operational simultaneously. 
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Entering REMOTE. 


When you are interacting with the remote Command Interpreter by having entered the word REMOTE 
and you are receiving the remote prompt (#), pressing will temporarily suspend the subsystem 
you are executing and will return control to the remote Command Interpreter. To continue remote 
processing at the point where it was interrupted, you merely enter RESUME in response to the remote 
prompt. 


AS an example, assume that you are in the midst of using the text editor in a remote session when you 
decide to start a job stream executing in your remote HP 3000. The sequence of commands would be 
similar to the example shown previously, but with a few minor differences, as follows: 


: REMOTE 
#EDITOR 


HP 32201A.7.05 EDIT/3000 FRI, FEB 13, 1981, 9:20 AM 
(C) HEWLETT-PACKARD CO. 1979 


/ADD 

1 LEWIS, LEO 51 M SV 

2 LAGERGREN, FRED 25 M SJ 

3 DICKINSON, MARY 21 F sc 

4 LAGREGREN, LINDA 2e4F SJ 

ioe ee 

BREAK pressed here. 
#STREAM APLTEST1 Control is 
#J20 still in the 

#RESUME remote session. 


READ pending 
MELLO, HENRY 44 M SJ 
6 SOARES, JOE 59 M LA 
7 LAWRENCE, ALICE 44 F SJ 
8 LEWIS, BOB 29 M WASH 


Notice that when was pressed, the text editor in the remote HP 3000 was waiting for you to 
enter the text for line 5. interrupted the remote session, but control remained in the remote 
HP 3000 (as signified by the remote # prompt). The STREAM command executed the file APLTEST1 
within the remote HP 3000. Then, when the RESUME command was issued, control was passed back to 
the point where the text editor was interrupted (that is, the text editor is waiting for you to enter the 
text for line 5). When the text for line 5 is entered, the remote session proceeds as though nothing had 
happened. 


The Control Keys 


Within a remote session (CONTROLJH, (CONTROL)X, and (CONTROLJY perform exactly the same functions as they 
do in a normal MPE interactive session. 


For example, if you are using FCOPY or the text editor in a remote session, you can use (CONTROL)Y to 


prematurely terminate an FCOPY or text editor operation. When the operation terminates, control is 
still in the particular subsystem within the remote session. 
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Similarly, you can use (CONTROLJH to delete the last character entered or (CONTROL)X to delete the line of 
text currently being entered. In both of these cases, after the deletion occurs, control remains in the 
remote session. 


ISSUING LOCAL COMMANDS 


Whenever the standard MPE colon prompt is displayed at your terminal, you are in the local session. 

- Within the local session, you enter MPE commands in their normal format in response to the colon 
prompt. If you are in the midst of a remote session (that is, you used the command : REMOTE, and 
DSN/DS is issuing the # prompt character), you can return control to your local session by entering a 
colon, as follows: 


#: 


In response to the remote colon, control returns to the MPE Command Interpreter of your local HP 
3000 which then prompts you for local commands with the colon prompt character. Note that the 
remote colon does not terminate the remote session; you can resume processing in the remote session by 
again using either of the constructs described under "Issuing Remote Commands." 


TERMINATING A REMOTE SESSION 


You can terminate a remote session either from within the local session or from within the remote 
session itself. 


From the Local Session 


Whenever the standard MPE colon prompt is displayed at your terminal, you are in the local session. 
To terminate a remote session from within your local session, use the following command: 


:REMOTE [xxx] BYE 
where xxx is the DS line number associated with the communications line connecting the particular 
remote session to your local session. (The DS line number is necessary only if you have more than one 
communications line open simultaneously; if it is omitted then the line that you most recently opened 


is referenced by default.) 


For instance, in the example in Section 1, either of the following sequences could have been used to 
terminate the remote session: 
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#: 
:REMOTE BYE 


CPU=4. CONNECT=7. WED, MAR 3, 1982, 9:13 AM 


° 
° 


#eE OR 444 


#: 
:REMOTE 3 BYE 


CPU=4. CONNECT=7. WED, MAR 3, 1982, 9:13 AM 


In both cases, the remote colon was used to return control from the remote session to the local session. 
In either case, the remote session is terminated. Remote sessions are also automatically terminated 
when the local session is terminated. 


If the communications line was opened using the DSLINE= parameter of the :REMOTE HELLO 
command, the line is automatically closed when the remote session terminates. To initiate another 
remote session over the same communications line, you must once again open the line (using either the 
: DSLINE command or the DSLINE= parameter of the :REMOTE HELLO command) and then issue 
another :REMOTE HELLO command. 


If the communications line was opened using the :DSLINE command, it is still open. To initiate a new 
remote session over the same communications line, merely issue another :REMOTE HELLO command 
(you do not need to issue another :DSLINE command because the communications line is still open). 
To close the communications line, use the constructs presented in Section 2. 


From the Remote Session 


Whenever the # prompt is displayed at your terminal, you are in the remote session. To terminate a 
remote session from within the remote session itself, use the following command: 


#BYE 


Note that you do not need to supply a DS line number in this case, because DSN/DS knows implicitly 
which remote session you wish to terminate (that is, the one in which the #BYE command is executed). 


Remember that this command was used to terminate the remote session in the example at the end of 
Section 1, as follows: 


#BYE 


CPU=4. CONNECT=7. WED, MAR 3, 1982, 9:15 AM 
# 


Notice that although the remote session is terminated, DSN/DS is still issuing the # prompt character. 
To return control to the local session, issue a colon (described earlier under "Issuing Local Commands"). 


If the communications line was opened using the :DSLINE command, it is still open. To initiate 
another remote session over the same communications line, merely issue an appropriate remote MPE 


3-8 


Remote Sessions 


HELLO command. (You do not need to use the prefix REMOTE because DSN/DS is still waiting for you 
to enter a remote command; nor do you need to issue another DSLINE command because the 
communications line is still open.) To close the communications line, use the constructs presented in 
Section 2. 


If the communications line was opened using the DSLINE= parameter of the :REMOTE HELLO 
command, the line is automatically closed when the remote session terminates. To initiate another 
remote session over the same line, you must once again open the line (using the :DSLINE command or 
the DSLINE= parameter of a :REMOTE HELLO command) and then issue another :REMOTE HELLO 
command. 
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SECTION 


In the preceding sections, you have seen how you can establish a communications link between two HP 
3000s and thereby use the computing power of the remote HP 3000. But through the use of the 
DSN/DS Remote File Access (RFA) capability, programs running in your local session can: 


REMOTE FILE ACCESS 





e Use any of the devices connected to the remote HP 3000 as though they were connected directly 
to your local HP 3000 


e Access any of the disc files of the remote HP 3000 (subject to the normal MPE file security, of 
course) as though they resided at your local HP 3000 site. 


Section 4 is divided into two main parts. The first part, "Interactive Access’, describes how you can 
issue local MPE FILE commands that define devices and/or files residing at the remote HP 3000 site. 
The second part, "Programmatic Access", describes how you can use the standard set of MPE File 
System intrinsics within your local programs to access devices and/or files residing at the remote HP 
3000 site. 


INTERACTIVE ACCESS 


After a DSN/DS communications link has been established, you can issue local MPE FILE commands 
that define devices and/or files residing at the remote HP 3000 site. To make this possible, the DEV= 
parameter of the MPE :FILE command was expanded to include a DS line specification in addition to 
the usual device specification. To specify a file that resides across a DS line, the format of the DEV= 
parameter is as follows: 


;DEV=[dsdevice]# [device] 


where dsdevice is the device class name, logical device number, or node name that you used when 
establishing the particular communications link (this specifies the physical line connecting the two 
computers); and device is the device class name or logical device number of the desired remote device 
as established within the remote HP 3000. It defaults to DISC. (Refer to the MPE Commands 
Reference Manual for the complete syntax and all parameters. ) 


NOTE 


When the : FILE command is entered on a remote 
system to point back to a file on the local system, 
dsdevice is omitted. 


The dsdevice# parameter (within the DEV= parameter) is the only parameter of the MPE :FI LE 
command that is unique to DSN/DS. This one small item of syntax is enormously powerful. It means 
that from within your local session you can access any of the devices and/or disc files of a remote HP 
3000 as though they resided at your local HP 3000 site. Access to remote disc files is, of course, 
subject to the usual MPE file security. The user, account, and group names that you specified in the 
*REMOTE HELLO command when establishing the communications link are the ones used by MPE in 
the remote HP 3000 for determining your file access capabilities. 
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If device is omitted, the local system is used instead of the remote system. This is useful in cases 
where, for example, a program is located on a remote system, but the data it uses is located on the local 
system. See Example #5. 


Following are five annotated examples illustrating remote device and file access from a local session. 
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Example #1: Remote Off-Line Listing 


Assume that you, using the Test Editor on your HP 3000, are to maintain an ASCII file containing 
both uppercase and lowercase characters, but that you don’t have an upper/lowercase line printer. 
Assume further that elsewhere ia the same building there is another HP 3000 with an 
upper/lowercase line printer, that both HP 3000s have DS capability, and that they are connected to 
one another by an interconnecting cable and communications interfaces. You can access the remote 
line printer as follows. 


First, the console operators of both computer systems OPEN the line. (See Section 9.) Then, you log on 
to your HP 3000 and establish a communications link with the remote HP 3000. 


>HELLO USER. ACCOUNT 
:REMOTE HELLO RUSER.RACCOUNT ;DSLINE=LINE2 


where USER and ACCOUNT are valid user and account names (respectively) within the accounting 
structure of your local HP 3000, RUSER and RACCOUNT are valid user and account names (respectively) 
within the accounting structure of the remote HP 3000, and LINE2 is the device class name of the 
IODSO entry (or the node name associated with the IODSX entry) for the local communications 
interface to which the interconnecting cable is connected. . 


Next, issue a local MPE : FILE command that defines the desired line printer as a remote device. 
:FILE LIST;DEV=LINE2#SLOWLP 


where LIST is the formal designator by which you will subsequently reference the line printer, LINE2 
is the device class name (or node name) you used when establishing the particular communications 
link, the # symbol tells the local file system that the next parameter references a device on the remote 
system, and SLOWLP is the device class name (as established within the remote HP 3000) of the 
upper/lowercase line printer. 


Then, invoke the Text Editor of your local HP 3000, specifying the remote line printer as the off-line 
listing device: 


sEDITOR #*LIST 
Thereafter, direct the Text Editor offline output to the remote upper/lowercase line printer as though 
it were connected directly to your local HP 3000. For example, you could print the content of the file 


TEXTFILE on the upper/lowercase line printer as follows: 


/TEXT TEXTFILE 
/LIST ALL,OFFLINE 


The entire command sequence is as follows (see Figure 4-1): 


>HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. TUE, AUG 3, 1982, 12:51 PM 


WELCOME TO SYSTEM A. 
:REMOTE HELLO RUSER.RACCOUNT ;DSLINE=LINE2 


DS LINE NUMBER = #L3 
HP3000 / MPE IV C.00.04. TUE, AUG 3, 1982, 12:52 PM 
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WELCOME TO SYSTEM B. 


>FILE LIST;DEV=LINE2#SLOWLP 

:EDITOR #*LIST 

HP32201A.7.10 EDIT/3000 TUE, AUG 3, 1982, 12:53 PM 
(C) HEWLETT-PACKARD CO. 1981 

/TEXT TEXTFILE 

/LIST ALL,OFFLINE 

##* OFF LINE LISTING BEGUN, ### 


SYSTEM A SYSTEM B 


Dise 










> LOCAL _ macs REMOTE 
SESSION SESSION 


EDITOR 






Textfile 


—_—— |] 
j 








Log-On 
Terminal 


Upper/Lower Case 
Line Printer 
(SLOWLP) 


Figure 4-1, Remote Off-Line Listing Example 
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Example #2: Locally Sorting a Remote File 


Assume that there is a file named SOURCE residing on a disc connected to a remote HP 3000 and that 
SOURCE contains a list of clients sorted alphabetically by the clients’ names. Assume further that the 
remote HP 3000 and your local HP 3000 both have DSN/DS configured and that they are 
interconnected by a hardwired connection. You wish to access the remote file SOURCE from your 
local HP 3000, sort its content alphabetically by the names of the states in which the clients reside, 
and store the sorted version in a newly created disc file named SORTED on your local HP 3000. You 
can do that (without disturbing the original content of SOURCE) as follows. 


First, the console operators of both computer systems OPEN the line. (See Section 9.) Then, log on to 
your local HP 3000 and establish a communications link with the remote HP 3000. 


>HELLO USER. ACCOUNT 
:REMOTE HELLO RUSER.RACCOUNT ;DSLINE=LINE2 


where USER and ACCOUNT are valid user and account names respectively) within the accounting 
structure of your local HP 3000, RUSER and RACCOUNT are valid user and account names (respectively) 
within the accounting structure of the remote HP 3000, and LINE@ is the device class name of the 
IODSO entry (or the node name associated with the IODSX entry) for the local communications 
interface to which the interconnecting cable is connected. 


Next, issue a local MPE : BUILD command to create the local disc file SORTED that will receive the 
sorted output. 
: BUILD SORTED;DISC=250,1,1;REC=-80,16,F,ASCII 


Then, issue two local MPE :FILE commands: one that defines the remote disc file SOURCE as the sort 
input file and one that defines the local disc file SORTED as the sort output file. 


:FILE INPUT=SOURCE;DEV=LINE2#DISC 
:FILE OUTPUT=SORTED 


Then, invoke the Sort program, specify the sort key, and initiate the actual sort. 

:RUN SORT.PUB.SYS 

>»KEY 50,9 

>END 
Note that the sort is performed in your local HP 3000, using the remote disc file SOURCE as the sort 
input file; the output of the sort is stored in the local disc file SORTED; and the original content of 
SOURCE is not altered. 


The entire command sequence is as follows (see Figure 4-2): 


>HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. TUE, AUG 3, 1982, 12:51 PM 


WELCOME TO SYSTEM A. 
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:REMOTE HELLO RUSER.RACCOUNT ;DSLINE=LINE2 
DS LINE NUMBER = #L3 
HP3000 / MPE IV C.00.04. TUE, AUG 3, 1982, 12:52 PM 


WELCOME TO SYSTEM B. 


:BUILD SORTED; DISC=250,1,1;REC=-80,16,F ,ASCII 
:FILE INPUT=SOURCE ; DEV=LINE2#DISC 

:FILE OUTPUT=SORTED 

:RUN SORT. PUB.SYS 

>KEY 50,9 

>END 


STATISTICS 


NUMBER OF RECORDS = 221 

RECORD SIZE (IN BYTES) = 80 

NUMBER OF INTERMEDIATE PASSES = 0 
SPACE AVAILABLE (IN WORDS) = 13,346 
NUMBER OF COMPARES = 45 

NUMBER OF SCRATCHFILE I0’S = 10 

CPU TIME (MINUTES) = .01 

ELAPSED TIME (MINUTES) = .14 


END OF PROGRAM 


e 
e 
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SYSTEM A SYSTEM B 






; 
SESSION 


| SORT 





SORTED 


Log-On 
Terminal 





SOURCE 


Figure 4-2, SORT Remote File Access Example 
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Example #3: FCOPYing to a remote system 


Suppose that you want to copy a disc file from your local HP 3000 to a remote HP 3000. Assume a 
hardwired connection and DSN/DS is configured. You can perform the file copy operation as follows. 


First, the console operators of both computer systems OPEN the line. (See Section 9.) Then, you log on 
to your local HP 3000 and establish a communications link with the remote HP 3000. 


:HELLO USER. ACCOUNT 
:REMOTE HELLO RUSER.RACCOUNT;DSLINE=LINE2 


where USER and ACCOUNT are valid user and account names (respectively) within the accounting 
structure of your local HP 3000, RUSER and RACCOUNT are valid user and account names (respectively) 
within the accounting structure of the remote HP 3000, and LINE2 is the node name or the device 
class name of the local IODSX or IODSO that is associated with the line that you want to use. 


Next, issue a local MPE : FILE command defining the destination file (REMFILE) as being a remote 
disc file. 


:FILE REMFILE;DEV=LINE2#DISC 
Then, invoke the File Copier and specify the file copy parameters. 


;RUN FCOPY.PUB.SYS 
>FROM=LOCFILE ; TO=*REMFILE;NEW 


A new disc file named REMFILE is created in the home group of the RACCOUNT account in the remote 
HP 3000 and the content of the local disc file LOCFILE is then copied over the communications line 
into REMFILE. 


The entire command sequence is as follows (see Figure 4-3): 


>HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 12:51 PM 


WELCOME TO SYSTEM A. 

>REMOTE HELLO RUSER.RACCOUNT;DSLINE=LINE2 

DS LINE NUMBER = #L3 

HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 12:52 PM 
WELCOME TO SYSTEM B. 

;FILE REMFILE;DEV=LINE2#DISC 


>RUN FCOPY.PUB.SYS > 
HP32212A.3.16 FILE COPIER (C) HEWLETT-PACKARD CO. 1981 
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>FROM=LOCF ILE; TO=*REMF ILE; NEW 
EOF FOUND IN FROMFILE AFTER RECORD 2017 


2018 RECORDS PROCESSED **#* 0 ERRORS 


>EXIT 
END OF PROGRAM 


SYSTEM A SYSTEM B 














LOCAL 
SESSION 








FGOPY 


LOCFILE 





Terminal 


REMFILE 


Figure 4-3. FCOPY Remote File Access Example 
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Example #4: Locally Running Remote Programs 

Assume that there is a COBOL source file named SOURCE1 residing on a disc connected to a remote 
HP 3000 and that you want to compile, prepare, and execute that program on your local HP 3000. 
Assume further that the remote HP 3000 and your local HP 3000 both have DSN/DS configured and 
a hardwired interconnection. You can locally compile, prepare, and execute the remote source file as 
follows. ; 


First, the console operators of both computer systems OPEN the line. (See Section 9.) Then, log on to 
your HP 3000 and establish a communications link with the remote HP 3000. 


>HELLO USER. ACCOUNT 
:REMOTE HELLO RUSER.RACCOUNT;DSLINE=LINE2 


where USER and ACCOUNT are valid user and account names (respectively) within the accounting 
structure of your local HP 3000, RUSER and RACCOUNT are valid user and account names (respectively) 
within the accounting structure of the remote HP 3000, and LINE2 is the device class name or node 
name of the local IODSO or IODSX entry associated with the line that you want to use. 
Next, issue a local MPE :FILE command defining the file SOURCE1 as being a remote disc file. 

:FILE SOURCE1;DEV=LINE2#DISc 
where LINE2 is the node name or the device class name that you used when establishing the 
communications link and DISC is the device class name (as established within the remote HP 3000) of 


the disc on which SOURCE1 resides. 


Then, invoke the COBOL compiler and the Segmenter of your local HP 3000, specifying the remote 
disc file SOURCE1 as the inputfile. 


:COBOLGO *SOURCE1 


The content of the remote disc file SOURCE1 is compiled, prepared, and executed in your local HP 
3000. 


The entire command sequence is as follows (see Figure 4-4): 


>HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 12:51 PM 


:REMOTE HELLO RUSER.RACCOUNT ;DSLINE=LINE2 
DS LINE NUMBER = #L3 


HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 12:52 PM 


sFILE SOURCE1;DEV=LINE2#DISC 
:COBOLGO *SOURCE1 


PAGE 0001 HP32213C.02.10 (C) HEWLETT-PACKARD CO. 1976 
(SOURCE1 is now being compiled. ) 
DATA AREA IS %000341 WORDS. 
CPU TIME = 0:00:01. WALL TIME = 0:00:07. 

END COBOL/3000 COMPILATION. NO ERRORS. NO WARNINGS. 
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END OF COMPILE 

(The compiled version of SOURCE1 is now being prepared by the MPE Segmenter. ) 
END OF PREPARE 

(The compiled and prepared version of SOURCE1 is now being executed. ) 


END OF PROGRAM 


NOTE | 


Due to the amount of time and system resources 
required for COBOL activity, this example does not 
make efficient use of a DS line. The general rule is 
to do the COBOL compile, preparation, and run on 
the same system where the data resides. Sometimes 
this means copying the data files to another system 
before (or after) COBOL activity, rather than 
copying across the line during the COBOL activity. 


SYSTEM A SYSTEM B 










Segmenter 
User Program 


Terminal 
SOURCE! 


Figure 4-4. COBOLGO Remote File Access Example 
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Example #5: Remote Programs and Local Data 

Assume that there is a COBOL source program named SOURCE1 residing on a disc connected to a 
remote HP 3000 and that you want to run that program using a data file named DATAT residing on 
your local system. Assume further that the remote HP 3000 and your local HP 3000 both have DS 
capability and a hardwired interconnection. You can do that as follows: 


First, log on to your HP 3000 and establish a communications link with the remote HP 3000. 


>HELLO USER. ACCOUNT 
>REMOTE HELLO RUSER.RACCOUNT ;DSLINE=LINE2 


where USER and ACCOUNT are valid user and account names (respectively) within the accounting 
structure of your local HP 3000, RUSER and RACCOUNT are valid user and account names (respectively) 
within the accounting structure of the remote HP 3000, and LINE2 is the device class name or node 
name of the local IODSO or IODSX entry associated with the line that you want to use. 

Next, issue a remote MPE :FILE command that defines the data file DATA! as being a local disc file. 


: REMOTE 
#FILE SOURCE1;DEV=# 


If you prefer, the :FILE command can be issued from your local session as follows: 


:REMOTE FILE DATA1;DEV=# 


where # indicates that the remote session should "go back" to the local session to find the data file. 
Then, invoke the COBOL compiler and the Segmenter of your remote HP 3000. 
#COBOLGO SOURCE1 
Or, if you prefer, you can run the job from your local session, as follows: 
:REMOTE COBOLGO SOURCE1 
The entire command sequence is as follows (see Figure 4-5): 


:HELLO USER. ACCOUNT 
HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 12:51 PM 


REMOTE HELLO RUSER.RACCOUNT;DSLINE=LINE2 
DS LINE NUMBER = #L3 


HP3000 / MPE IV C.00.04. WED, MAR 3, 1982, 12:52 PM 
: REMOTE 

#FILE DATA1;DEV=# 

#COBOLGO SOURCE1 

PAGE 0001 HP32213C.02.10 (C) HEWLETT-PACKARD CO. 1976 


(SOURCE1 is now being compiled.) 
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DATA AREA IS %000341 WORDS. 
CPU TIME = 0:00:01. WALL TIME = 0:00:17. 
END COBOL/3000 COMPILATION. NO ERRORS. NO WARNINGS. 


END OF COMPILE 
(SOURCE1 is now being prepared by the MPE Segmenter. ) 
END OF PREPARE 


(The compiled and prepared version of SOURCE1 is now being executed, and is accessing DATA1 
for data.) 


END OF PROGRAM 


SYSTEM A SYSTEM B 
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SESSION i 
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Figure 4-5. COBOL Remote File Access Example 
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NOTE 


Many aspects of system resources (for example, 
memory size, CPU load, type of CPU load, time 
quantums, etc.) affect how COBOL and remote data 
base access activities are conducted in a DSN/DS 
environment. In general, it is more efficient to 
transfer data, USL, and SL files before or after (but 
not during) COBOL activity. 


PROGRAMMATIC ACCESS 


Once a DSN/DS communications link has been established between your HP 3000 and a remote HP 
3000, you can use the standard set of MPE File System intrinsics within your local programs to access 
devices and/or files residing at the remote HP 3000 site. To make this possible, the format of the byte 
array referenced by the device parameter of the MPE FOPEN intrinsic was expanded to include a DS 
line specification in addition to the usual device specification. The format of the device byte array is 
as follows: 


- [dsdevice]#[device] 


‘where dsdevice is the device class name, logical device number, or node name that you used when 
establishing the particular communications link (this specifies the physical line connecting the two 
computers) and device is the device class name or logical device number of the desired remote device 
as established within the remote HP 3000. (For a complete presentation of all FOPEN intrinsic 
parameters, refer to the MPE Intrinsics Reference Manual.) 


NOTE 


When the : FILE command is entered on a remote 
system to point back to a file on the local system, 
dsdevice is omitted. 


The addition of dsdevice# to the format of the byte array referenced by the device parameter has 
enormously powerful implications. It means that programs executing in your local HP 3000 can easily 
access any of the devices and/or disc files of a remote HP 3000 as though they resided at your local 
HP 3000 site. Access to remote files is, of course, subject to the usual MPE file security. The user, 
account, and group names that you specified in the : REMOTE HELLO command when establishing the 
communications link are the ones used by MPE in the remote HP 3000 for determining your file 
access capabilities. 


On the following pages, an annotated example illustrates remote device and file access from a local 
program running within a local session. 


The Condition Codes for the various MPE File System intrinsics retain their normal meanings. Any 
communications line errors will return a CCL. In the event of an error, you can call the MPE FCHECK 
intrinsic to determine what happened. When using the MPE File System intrinsics for remote file 
access, the Message Block B (File System) error codes apply to the remote file. You may also use the 
MPE PRINTFILEINFO intrinsic to display the status of a remote file. 
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The following program example tests RFA capabilities by writing to a remote file, reading the records 
back, then listing the contents of the remote file on the remote line printer. 


Example 
The following program illustrates how remote files can be accessed by using file system intrinsics. 


$CONTROL USLINIT,ADR,MAP,CODE 
BEGIN 
INTEGER 
A, 
T:=-1, 
RDISCNUM, 
RLPNUM; 


BYTE ARRAY RMTLP’FILNAM(0:3):="RLP "5; 
BYTE ARRAY RLPDEV(0: 11); 

BYTE ARRAY RMTDISC’FILNAM(0:5):="RDISC "; 
BYTE ARRAY MSG(0:71)3 

BYTE ARRAY RDISCDEV(0:11); 


LOGICAL ARRAY LMSG(#*)=MSG; 
INTRINSIC PRINT ,READ,FOPEN,FWRITEDIR ,FREADDIR,FWRITE,FCLOSE; 
<< User enters remote disc device class name into RDISCDEV. >> 


MOVE MSG:="INPUT REMOTE DISC DEVICE CLASS NAME "; 
PRINT (MSG,-35,0); 

MOVE MSG:="IN THE FORM .. DSDEVICE#DISCDEV "; 
PRINT (MSG, -31,0); 

A: =READ(LMSG,-12); 

MOVE RDISCDEV: =MSG, (A); 


<< User enters remote LP device class name into RLPDEV. >> 


MOVE MSG:="INPUT REMOTE LP DEVICE CLASS NAME "; 
PRINT (MSG, -33,0); 

MOVE MSG:="IN THE FORM .. DSDEVICE#LPDEV °; 
PRINT (MSG, -29,0); 

A: =READ(LMSG,-12); 

MOVE RLPDEV:=MSG, (A) ; 


<< Open remote disc file. >> 


MOVE MSG:="OPENING REMOTE DISC FILE "3; 
PRINT (MSG, -24,0); 
RDISCNUM: =FOPEN (RMTDISC ’FILNAM,4,%104, -80,RDISCDEV) ; 
IF <> THEN 
BEGIN 
MOVE MSG:="COULD NOT OPEN REMOTE DISC FILE "; 
PRINT(MSG,-31,0); 
GO TO OUT; 
END; 
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<< Initialize remote disc file. >> 


MOVE MSG:="WRITING TO REMOTE DISC FILE "; 
PRINT (MSG, -27,0); 

MOVE MSG:=" "; 

MOVE MSG(1):=MSG(0) ,(71); 


<< Write ten copies of MSG to remote disc file as a line check. >> 


WHILE (I:=I+1) <10 DO 
BEGIN 
MOVE MSG:="REMOTE FILE ACCESS TEST "; 
FWRITEDIR(RDISCNUM, LMSG,36,DOUBLE(I)); <<RECORD TO BE 
WRITTEN >> 
IF <> THEN 
BEGIN 
MOVE MSG:="ERROR WHEN WRITING TO REMOTE DISC we 
PRINT (MSG,-33,0); 
GO TO-OUT; © 
END; 
END; 


<< Initialize LP file. >> 


MOVE MSG:="OPENING REMOTE LP FILE "; 
PRINT (MSG, -22,0); 
RLPNUM: =FOPEN(RMTLP’FILNAM,4,1,,RLPDEV); 
IF <> THEN 
BEGIN 
MOVE MSG:="COULD NOT OPEN REMOTE LP FILE "; 
PRINT (MSG,-29,0); 
END; 


<< Read 10 records from remote disc and write them to remote >> 
<< LP, one at a time. >> 


T:=-13 
WHILE (I:=I+ 1) < 10 DO 


BEGIN 
FREADDIR(RDISCNUM,LMSG,36,DOUBLE(I)); 
IF <> THEN 
BEGIN 
MOVE MSG:="COULD NOT READ REMOTE DISC FILE "; 
PRINT(MSG,-31,0); 
END; 
FWRITE (RLPNUM,LMSG, 36,0); 
IF <> THEN 
BEGIN 
MOVE MSG:="COULD NOT PRINT TO REMOTE LP FILE no 
PRINT (MSG, -34,0); 
END; 
END; 
OUT; 


END. 


SECTION 


IMAGE/3000 is HP’s data base management system. With DSN/DS, you can use it to access data 
bases on other computer systems. 


USING A REMOTE DATA BASE 





If you want to access a data base that resides on one HP 3000 computer system while operating a 
session on another HP 3000 computer system, you may do so provided both systems have DSN/DS 
capability. 


You may use a data base on a remote HP 3000 either from a program that is running on the remote 
system or from a program running on your local HP 3000. The various ways to open a 
communications line and initiate a remote session are described in Sections 1 through 4. This section 
describes ways to access data bases programmatically with DSN/DS. For example, you can establish a 
communications link and remote session and then run a remote program accessing a data base on the 
remote machine as illustrated in Figure 5-1. 


Local Terminal 













‘HELLO ... 
:DSUNE ... 

:REMOTE HELLO ... 
:REMOTE RUN PROGX ... 


Remote HP 3000 





Local HP 35000 
Program PROGX 


Data Base DBX 


Figure 5-1. Using a Remote Program. 


ACCESS THROUGH A LOCAL APPLICATION PROGRAM 


If you want to access a remote data base using a local application program, there are three methods 
you may choose from. In all cases, a local program accesses a remote data base and the data is passed 
across the communications line. 
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Method 1: Establishing the Session Interactively 


To use the first method, you interactively establish a communications link and a remote session and 
enter a :FILE equation for each remote data base. The : FILE equation specifies which data base is to 
be access on which remote system and device. A local application program can now access a remote 
data base, as shown in Figure 5-2. 


Local Terminal 







‘HELLO ... 
:DSUNE ... 

‘REMOTE HELLO .., 

FILE DBX;DEV=SYSX#DISCA 
‘FILE DBY:;DEV=SYSX#DISCA 
!tRUN PROGX 









Local HP 3000 Remote HP 3000 







SYSX 





Program PROGX: Data Base DBX 


and 
Data Base DBY 
reside on DISCA 













Calls DBOPEN 
for DBX and 
DBY data base. 








Figure 5-2, Using Method 1. 
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Method 2: Using the Command Intrinsic 


The second method is very similar to the first, but you use the MPE command intrinsic within your 
application program to establish the communications link, remote session and remote data base access. 
In order to use this method in a COBOL, RPG, or BASIC application program, you must write a 
procedure in SPL or FORTRAN and call the procedure. 


To use this method, you must issue a : REMOTE HELLO command (either as part of the :DSLINE 
parameter, or by issuing the :DSLINE as a seperate command) and a :FILE equation by calling the 
command intrinsic for each of these commands. The command intrinsic is explained in the MPE 
Intrinsics Reference Manual, and information about accessing remote files is given in Section 4. 
Figure 5-3 contains a diagram of Method 2. 


Local Terminal 

















sHELLO... 
RUN PROGX 


Local HP 3000 


Program PROGX: 
Remote 3000 





Contains calls to 

COMMAND "DSUNE SYSxX" 

COMMAND "REMOTE. HELLO..." 
COMMAND "FILE DBX;DEV=SYSX#DISCA" 


SYSX 















Data Base D0BX 
resides on DISCA 


(program code) 


COMMAND “REMOTE dsline#BYE..." 
COMMAND "DSUNE dsline#;CLOSE...” 


Figure 5-3, Using Method 2 


If you want to access more than one remotely located data base with an application program, you must 
enter one :FILE equation for each remote data base. It is important to remember that a : REMOTE 
HELLO to the same remote computer should not be repeated within a process since the second request 
for a remote session would log off the first one. 


When the application program calls the DBCLOSE procedure, or is ready to terminate execution, it 
must programmatically issue :REMOTE BYE and :DSLINE commands for the communications line 
specified with the foregoing command intrinsic. (Note that the application must also close all other 
files and devices it opened on the remote system, not just the database files, before the : REMOTE BYE 
and :DSLINE ;CLOSE commands. 
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If you use this method, any change in the data base name, account or password information requires 
modification of the application program. Since the application program maintains logical control over 
the commands that are issued, it is responsible for checking all status words returned by the remote 
system. 
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Method 3: Using a Data Base-Access File 


The third method involves creating a special file which we shall call the data base-access file (DBA 
file). This file provides IMAGE/3000 with the necessary information to establish a communications 
link and a remote session. It also specifies the remote data base or data base~-access file name so that 
the necessary IMAGE/3000 intrinsics can be executed on the remote computer. 


Local Termincl 






tHELLO USERA.ACCTA,GROUPA 
:RUN PROGX 








Local HP 3000 


Program PROGX: 
Remote 3000 







Calls 
OBOPEN with BASE orray 
containing OBAFY, 










SYSX 






Data Base DBY 
resides on DISCA 
in account ACCTB 


Data Base—Access file 
named OBAFY contains: 





Rec 1: FILE DBY;DEV=SYSX#DISCA 
Rec 2: DSLINE SYSX;j... 
Rec 3: USERAACCTA,GROUPA=HELLO USERB.ACCTB... 






Figure 5-4, Using Method 3 
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NOTE 


With Method 3, which uses the data base-access file, 
only one data base can be accessed using each data 
base-access file per :DSLINE. For example, if two 
computers are linked through two :DSLINEs, you can 
open one data base on each line. However, a second 
:REMOTE HELLO on either : DSLINE terminates the 
previous :REMOTE HELLO for that particular line. For 
multiple remote data base access, Method 1! or Method 2 
is recomended. If the data base-access file is used, 
automatic :REMOTE BYE and :DSLINE ;CLOSE 
commands are issued on the communications line 
specified in the data base-access file when the 
application program terminates execution. Note that 
even though the :REMOTE BYE and DSLINE ;CLOSE 
commands happen automatically, the application (PROGX 
in this example) program should provide for closing all 
remote file and remote devices that might be open 
before the application ends. 
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By using this approach, the data base administrator can set up a user-table that provides more control 
over the data base users, and thus, enhances data base security. To create the data base~-access file you 
use the Editor (Edit/3000). First use the :SET LENGTH command to accommodate the largest record 
to be included in the data base-access file, up to a maximum of 128 characters. The content of this 
file should be created in the format shown below. 


SYNTAX 

Record 1 :FILE dbname?[=dbname2]; DEV=dsdevice# [DISC] 

Record 2 :DSLINE dsdevice [;LINEBUF=buffer-size] [;LOCID=local-id-sequence] 
[ ;REMID=remote-id-sequence] [;PHNUM=telephone-number] [;EXCLUSIVE] 
[ ;QUIET] 

Record 3 lusername.lacetname[ ,lgroupname]=HELLO rusername [/rupasw] 
raeetname[/rapasw] [,rgroupname[/rgpasw]] [;TIME=cpusecs] 
[;PRI=priority] sHIPRI 

; INPRI=inputpriority 

Records 4 Same format as Record 3. Specifies other user.account, group identification. 

through n 

PARAMETERS 

dbname? is the name of the data base or the data base-access file on the remote 

system you want to access, or is the formal file designator used in the 
program if dbnamez is specified. 

dbname2 is the name of the data base or the data base-access file on the remote 

system you want to access. 

dsdevice is the device class name or logical device number assigned to the DSN/DS 


buffer-size 


Local -id-sequence 


communications driver (IODSO) during system configuration, or a logical 
node name associated with the DSN/X. 25 communications device (IODSX) 
during network configuration using NETCONF. 


is a decimal integer specifying the size (in words) of the DSN/DS line 
buffer to be used in conjunction with the communication line. The integer 
must be within the range 304 <buffer-size<4096. The default value is 
the buffer size entered in response to the PREFERRED BUFFER SIZE 
prompt during system configuration. 


is a string of ASCII characters contained within quotations marks. If you 
wish to use a quotation mark within an ASCII string, use two successive 
quotation marks. The maximum number of ASCII characters allowed in 
the string is 16. 


iat! 
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remote-id-sequence 


telephone-number 


EXCLUSIVE 


QUIET 


Lusername 


laectname 


lLgroupname 


The supplied string of ASCII characters defines the ID sequence that will be 
sent from your HP 3000 to the remote HP 3000 when you attempt to 
establish the telephone connection. If the remote HP 3000 does not 
recognize the supplied ID sequence as a valid one, the telephone connection 
is terminated. The default value is the ASCII string entered in response to 
the LOCAL ID SEQUENCE prompt during system configuration. 


Same format as Local-id-sequence. 


The supplied string of ASCII characters defines those remote HP 3000 ID 
sequences that will be considered valid when you attempt to establish the 
telephone connection. If the remote HP 3000 does not send a valid ID 
sequence, the telephone connection is terminated. The default set of 
remote ID sequences consists of the ASCII strings entered in response to the 
REMOTE ID SEQUENCE prompt during system configuration. 


is a telephone number consisting of digits and dashes. The maximum length 
permitted (including both digits and dashes) is 20 characters. If YES was 
entered in response to the DIAL FACILITY prompt during system 
configuration, this telephone number will be displayed at the operator’s 
console of your HP 3000 and the operator will then establish the telephone 
connection by dialing that number at the modem. The default telephone 
number is the first one entered in response to the PHONE NUMBER prompt 
during system configuration. 


specifies that you want exclusive use of the particular communications line. 
If the specified HSI or SSLC is already open and you have specified the 
exclusive option, DS/3000 will deny you access to the line (you cannot open 
it). Opening an EXCLUSIVE line requires the user to have CS capability. 
This capability may be granted by a system manager or account manager. 


specifies that the message identifying the DS line number will be 
suppressed. The messages associated with subsequent :REMOTE HELLO and 
:REMOTE BYE commands will also be suppressed. In this case, the terminal 
operator is totally unaware that remote processing is taking place. 


is a user name on the local HP 3000, as established by an account manager, 
that allows you to log on under this account. This name is unique within 
the account. It contains from 1 to 8 alphanumeric characters, beginning 
with a letter. An at sign (@) may be used to indicate the log on user name. 


is the name of your account on the local HP 3000 as established by a system 
manager. It contains | to 8 alphanumeric characters, beginning with a 
letter. An at sign (@) may be used to indicate the log on account. 


is the name of a file group to be used for the local file domain and central 
processor time charges, as established by an account manager. It contains 
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rusername 


racetname 


rgroupname 


rupasw 


rapasw 


rgpasw 


TIME=cpusecs 


BS 
CS 
DS 
ES 


PRI= 


INPRI=input priority 
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from | to 8 alphanumeric charcters, beginning with a letter. An at sign (@) 
may be used to indicate the log on group. 


is a user name on the remote HP 3000 that allows you to log on under the 
remote account. It follows the same rules as username. An at sign (@) 
may be used to indicate rusername as with Lususername. 


is the name of the log on account on the remote HP 3000. It follows the 
same rules as Zacctname. An at sign (@) may be used to indicate 
racetname is the same as Lacctname. 


is the name of the log on group on the remote HP 3000. It follows the 
same rules as Zgroupname. An at sign (@) may be used to indicate 
rgroupname is same as Lgroupname. 


is the password assigned to rusername. 
is the password assigned to racctname. 
is the password asigned to rgroupname. 


is the maximum central processor time that your remote session can use, 
entered in seconds. When this limit is reached, the remote session is 
aborted. It must be a value from 1 to 32767. To specify no limit, enter a 
question mark or omit this parameter. Default: No limit. 


is the execution priority class that the Command Intepreter uses for your 
remote session, and also the default priority for all programs executed 
within the remote session. BS is highest priority; ES is lowest. If you 
specify a priority that exceeds the highest that the system permits for 
racetname or rusername, MPE assigns the highest priority possible below 
BS. Default: CS. 


| NOTE | 


DS and ES are intended primarily for batch Jobs; their 
use for sessions is generally discouraged. 


is the relative input priority used in checking against access restrictions 
imposed by the job fence, if one exists. It takes effect at log on time. It 
must be a value from 1 (lowest) to 13 (highest priority). If you supply a 
value less than or equal to the current job fence set by the console operator, 
the session is denied access. Default: 8 if logging of session/job initiation is 
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enabled, 13 otherwise. 


HIPRI is a request for maximum session-selection input priority, causing the 
remote session to be scheduled regardless of the current job fence or 
execution limit for sessions. 


NOTE 


You can specify this only if you have system manager or 
supervisor capability. (Optional parameter) 


Syntax Considerations 
The following syntax should be noted: 


¢ No spaces are allowed around the periods in the optional file reference, or separating dsdevice 
and the # sign, in Record 1. 


e Passwords are not allowed with the local user, account, and group names. They are not neccessary 
since the local user passes the security password checks when logging on the local session. 


NOTE 


Remote logon parameters must define a valid logon 
known to the remote machine. For example, if a 
particular user name requires a password on the remote 
machine, the password parameter is not optional in the 
data base-access file and must be supplied in the : HELLO 
command. 
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USER IDENTIFICATION. 


Records 3 through n in a DBA file tell IMAGE/3000 which user, account, and group names on the 
local computer may access which user, account, and group names on the remote computer. You may 
specify remote user identification for more than one local user by creating a record for each local 
user.account,group in the format of Record 3 shown above. An at sign (@) may be substituted for 
any user, account, or group name in the record. If an at sign is substituted for Lusername, 
laectname, or Lgroupname, the name is replaced with the corresponding name specified at log on 
time. 


When a local user runs a program that DBOPEN the DBA file, IMAGE/ 3000 searches for a match 
between the local user, account and group names in the DBA file and the names the user entered when 
logging on to the local session. When a match is found, IMAGE/3000 performs a the : FILE and 

: DSLINE commands, and a :REMOTE HELLO using the corresponding rusername, racctname, 
rgroupname, and passwords if present. If an at sign is found, it is replaced with the corresponding 
name to the left of =HELLO. For example, if the record contains USERA. ACCTA, GROUPA=HELLO 
@.ACCTB,@ IMAGE/3000 replaces the first at sign with USERA and the second with GROUPA. If an 
at sign is not found, no substitutions are made. In either case, the information to the right of =HELLO 
is used as the remote log on identification. 


EXAMPLE. The following syntax should be noted: 

Record 1 FILE STORE;DEV=DSL1#DISC 

Record 2 DSLINE DSL1 

Record 3 USERA.ACCTA,GROUPA=HELLO USERB.ACCTA,GROUPB 

Record 4 @.ACCTA,GROUPA=HELLO USERA.ACCTA,GROUPA 

Record 5 USERB.ACCTB,@=HELLO USERB.ACCTX,@ 

End of file 

If a user logs on with the log on identification indicated in the first column below, IMAGE/ 3000 will 


use the corresponding user.acct,group identification in the second column to establish 
communication with the remote system. 


Log-on Identification Remote Identification Used 
User! USERA.ACCTA,GROUPA USERB.ACCTA,GROUPB 
User2 USERB.ACCTA,GROUPA USERA.ACCTA,GROUPA 
User3 USERB.ACCTB,GROUPB USERB.ACCTX ,GROUPB 
User4 USERA.ACCTB,GROUPB None, no match found. 


The first user’s log-on identification matches the local user, account, and group names specified in 
Record 3, so the remote names specified in that record are used. The second user’s account matches 
Record 3 but the user name does not, so IMAGE/3000 looks for another table entry with account 
ACCTA. Since the entry in Record 4 specifies any user (@) of ACCTAif their group is GROUPA, the 
second user’s remote identification will be that specified in Record 4. 


The third user logs on to ACCTB and a match is found in Record 5, since it specifies the same user 
name and accepts any group in the account. 
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The fourth user’s account matches Record 5 but the user name does not match. Therefore, the fourth 
user cannot access the remote data base with this application program. 


FILENAME. 
After you have created the file with the Editor, you should KEEP it UNNumbered. The file name must 


follow the same rules. as a data base name. It must be an alphanumeric string from 1 to 6 characters, 
the first character must be alphabetic. 


ACTIVATING A DATA BASE~ACCESS FILE. 


After you have constructed a data base-access file, you must use the DBUTIL utility program to 
activate the file. The complete syntax for running the utility program is given in Section 8 of the 
IMAGE/ 3000 Reference Manual. Here is a summary of the operating instructions: 


>RUN DBUTIL.PUB.SYS 


>»ACTIVATE data base-access file name 


Verification follows: 


FILE command: <result> 
DSLINE command: <result> 
HELLO command: <result> 


ACTIVATED 
> EXIT 
DBUTIL verifies that the file to be activated: 
e has a file code of zero 
e isan UNNUMBERED, ASCII file 
e has a record length <=128 characters 


e has at least three records. 


If any of these conditions is not satisfied, activation fails. If all of the above are satisfied, DBUTIL 
prints the following message: 


Verification Follows: 
Then the utility program verifies the syntax of: 
e Record | 
e Record 2 through dsdevice, which must be identical to the dsdevice specified in Record 1 
e Records 3 through n, through the parameter rgpasw. . 
This means that for Records 2 through n only the positional parameters (those whose function is 


determined by their relative position within the command) are verified by DBUTIL. The remaining 
key word parameters are checked by the command interpreter at DBOPEN time. 
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If all of the above conditions are met, DBUTIL successfully activates the data base-access file, by 
changing the file code to the IMAGE/3000 reserved code -402. The example in Figure 5-5 
illustrates how to create and activate a data base-access file. In this case, the file named DSASTR 1s to 
be used to gain access to the STORE data base residing on a remote system in the PAYACCT account. 
The remote system is referenced by dsdevice name MY. 


After the data base-access file is created using the Editor, it is enabled by using the DBUTIL utility 
program. 
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HELLO MEMBER1.PAYACCT 


: EDITOR 


HP32201A.7.05 EDIT/3000 MON, APR 16, 1979 


(C) HEWLETT-PACKARD CO. 1979 
/A 

FILE STORE; DEV=MY# 
DSLINE MY 


oBWND — 


/K_DBASTR,UNN 
/E 


END OF SUBSYSTEM 
>RUN DBUTIL.PUB.SYS 
>>ACTIVATE DBASTR 
Verification follows: 
FILE command: Looks good 
DSLINE command: Looks good 
HELLO command: Looks good 
HELLO command: Looks good 
ACTIVATED 
> EXIT 


END OF PROGRAM 


MEMBER1.PAYACCT=HELLO MEMBER1.PAYACCT 
MEMBER2.PAYACCT=HELLO @. PAYACCT 


Log on to the local 
system. 


Run the Editor. 


Create records in data 
base-access file. 


Keep the file. 


Run DBUTIL to enable 
file. 


Figure 5-5. Preparing a Data Base-Access File. 


ACCESSING DATA BASES. 


To reference the data base from your local application program, use the data base-access file name 
instead of the root file name when calling the IMAGE/3000 procedure. The word array specified as 
the base parameter must contain a pair of blanks followed by the left-justified data base-access file 
name and terminated by a semicolon or blank. IMAGE/3000 recognizes the -402 file code and 
establishes a communications link to the remote HP 3000. If the data base is succesfully opened, 
IMAGE/3000 replaces the pair of blanks with the extra data segment number of the assigned Remote 
Data Base Control Block. The base parameter must remain unchanged for the remainder of the 
process. When the application program calls the DBCLOSE procedure or terminates execution, 
automatic :REMOTE BYE and :DSLINE commands are issued to terminate the session and close the 


communications line. 
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Figure 5-6 illustrates use of the data base-access file through a program named APPLICAN. After 
logging on to the local system, the user runs the program named APPLICAN from the local session. 

The base array in this program contains" DBASTR". When a call to DBOPEN is executed, 
IMAGE/3000 establishes a communication line and remote session. When the program closes the data 


base, IMAGE/3000 closes the line and terminates the remote session. 


>HELLO MEMBER2. PAYACCT 


:RUN APPLICAN 


DS LINE NUMBER = #L4 
HP3000 IIB. MON, APR 17, 1978, 1:56 PM 


WELCOME TO SYSTEM B. 


CPU=2. CONNECT=1. MON, APR 17, 1978, 1:59 PM 
1 DS LINE WAS CLOSED 


: BYE 


Figure 5-6, Using a Data Base-Access File. 


QUERY/ 3000 


Log on to local 
system. 


Execute application 
program. 


IMAGE /3000 establishes 
a communications line 
and remote session. 


When the data base is 
closed, IMAGE/3000 
closes the line and 
terminates remote 
session. 


Log off local system. 


When you run QUERY/ 3000, which is accessed with RUN QUERY. PUB.SYS, you can specify the data 
base to be used in two ways. You can use the DEFINE command, which then prompts you for: 


DATA- BASE, 

PASSWORD, 

MODE (see Table 5-1 for available modes), 
DATA-SETS to be accessed, 


PROC-FILE, which stores FIND, REPORT, and UPDATE commands as procedures, 


OUTPUT, which specifies the output device. 


You can also specify these options individually, as QUER Y/3000 commands. 


The DATA BASE= prompt can be answered with a remote data base name or the data base-access file 
name. Note, however, that perfomance can be significantly improved if you run QUERY/3000 in 
remote session, thereby accessing the data base on the system where it resides, rather than running 


QUERY/3000 locally to access a remote data base. 
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Table 5-1. Modes of Access 


— ian 
nan 









find (read), replace, add, and delete entries. 
(QUERY/3000 requests IMAGE/ 3000 to 
lock and unlock the data base dynamically 
when accessing it.) 














find and replace entries. 











find, replace, add, and replace entries. 


find entries. (QUERY/3000 locks and 
unlocks. ) 








find entries. 


These modes give you exclusive access to the data base. All other modes allow others to share the 
data base. Search and sort items cannot be replaced. 









PROGRAM-TO-PROGRAM 


COMMUNICATIONS 


In the preceding sections, you have seen how you can establish communications links between several 
HP 3000 computers to form a telecommunications network and how you can execute programs in any 
of the HP 3000s from a single log-on terminal. Furthermore, you have seen that programs running 
within any HP 3000 in the network can, under the proper circumstances, obtain access to any of the 
hardware or software resources available throughout the network. At this point, you already have a 
powerful telecommunications network capability at your disposal. 


But for many teleprocessing applications, it is essential that separate user programs be able to be run 
simultaneously in separate computers within the network and that they be able to communicate 
efficiently with one another. 


Two capabilities answer that need: DSN/DS Program-to-Program (PTOP) Communications (described 
in this section) and MPE Interprocess Communications (IPC) (described in Section 8). 


You might ask, "Why can’t the normal process-handling capabilities of MPE be used for this purpose?” 
As you probably recall, the process~handling capabilities of MPE permit a user process (referred to as 
the "father" process), to create and activate one or more "son" processes that then run concurrently 
with the father process. Father and son processes can communicate efficiently with one another 
through the use of the SENDMAIL intrinsics, shared extra data segments, or a shared user file. 
Unfortunately, however, the process~handling capabilities of MPE were designed for use within a 
single processor. They cannot handle the intervention of a communications line between father and 
son processes. 


Suppose you were to log on to an HP 3000, gain access to a DS line, and initiate a remote session. 
Within the local session, you use a STREAM command to initiate the execution of a program named 
PROGA; and within the remote session, you use a STREAM command to initiate execution of a program 
named PROGB. You now have two programs executing simultaneously: PROGA in your local HP 
3000 and PROGB in the remote HP 3000. 


At this point, the two programs are entirely independent of one another: neither knows the other 
exists. If you add a shared access disc file to the situation, PROGA and PROGB can now read from 
and write to that file, and thereby communicate indirectly with one another. This arrangement 
works well as long as the data being deposited in the shared file does not have to be retrieved, 
processed, and responded to within a finite period of time. 


There are teleprocessing applications where this type of arrangement is not only adequate but makes a 
great deal of sense. For example, consider the case where a branch office is accumulating information 
that must be merged once a day into a data base residing at the main office. In this case, the two 
programs can make very effective use of the message file approach that IPC uses (see Section 8 for a 
description). 


As soon as an application tries to be truly interactive, however, this arrangement falters because the 
two programs cannot communicate directly. Each must know whether or not the other program 1s 
trying to transmit data. The more dependent each program is upon receiving data from the other, the 
more likely it is that PTOP should be used for the application. 


With the remote file access method of program~-to-program communication (IPC), the two programs 


have no way of knowing if the other program is actually executing. With the POPEN intrinsic, the 
master program knows that the slave program is executing, because it created and activated the slave 


a 


PTOP Communications 


, . 
program’s process. Likewise, the slave program knows that the master program is executing, because 
without an active corresponding master program, the slave itself would not be executing. 


The DSN/DS program-to-program communications facility provides nine intrinsics that make it 
possible for two or more user programs residing in separate HP 3000s to exchange data and control 
information directly (and efficiently) over DSN/DS communications links. 


The nature of any two programs that are communicating with one another in this manner is not 
symmetrical. One of them (referred to as the "master" program) is always in control and is the one 
that initiates all activity between the two programs. The other (referred to as a "slave" program) 
always responds to requests received from the master. Those intrinsics used within a master program 
are summarized in Table 6-1, and those used within a slave program are summarized in Table 6-2. 


Table 6-1. Master Program-to-Program Intrinsics, 











Intrinsic Name 


andl 








Initiates and activates a slave process in a remote HP 3000 and initiates 
program -to-program communication with the slave program. 











Sends a read request to the remote slave program asking the slave to send 
a block of data back to the master. 












Sends a block of data to the remote slave program. 






Transmits a tag field (containing user-defined control information) to the 
remote slave program and receives a tag field back from the slave. 












Terminates (kills) the remote slave program’s process. 






Returns an integer code specifying the completion status of the most 
recently executed master program-to-program intrinsic. 
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Table 6-2. Slave Program-to-Program Intrinsics. 






Intrinsic Name 


Conceptually, the DSN/DS program~-to-program intrinsics are very similar to the MPE process 
handling and file system intrinsics that are used for process-to-process communication within a 
single-system environment. Table 6-3 compares the intrinsics used for process-to-process 
communication within a single-system environment to those used for program-to-program 
communication within a distributed systems environment. 












Receives the next request from the remote master program. 


Accepts (and completes) the request received by the preceding GET 
intrinsic call. 







Rejects the request received by the preceding GET intrinsic call. 







Returns an integer code specifying the completion status of the most 
recently executed slave program-to-program intrinsic. 
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Table 6-3, Single System / Distributed Systems Comparison. 


Function Single System Distributed Systems 
(Process Handling) (Program-to-Program) 


Initiate CREATE POPEN 
another ACTIVATE - 
process. 


Communicate Mail Intrinsics: Master (father) Requests: 
with the other 
process. SENDMAIL PREAD 
RECEIVEMAIL PWRITE 
PCONTROL 
PCHECK 


User Managed Extra Data Segment Slave (son) Responses: 


GETDSEG GET 

DMOVEIN ACCEPT 

DMOVEOUT REJECT 
PCHECK 


Shared User File: 


FOPEN 
FREAD 
FWRITE 
FCONTROL 
FCLOSE 
FCHECK 


Terminate the Father: Master (father): 
other process. 


KILL (a son) PCLOSE (a slave) 


TERMINATE (self | TERMINATE (self 
and all sons) and all slaves) 
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When a DSN/DS communications link exists between two HP 3000s, a user program (the master 
program) can create and activate a son process (a slave program) in the remote HP 3000. The POPEN 
intrinsic performs this function, in place of the standard MPE CREATE and ACTIVATE intrinsics. 


After the master and slave programs are both executing, the master program can: 
e Send data (PWRITE) or control information (PCONTROL) directly to the slave program 


e Senda read request (PREAD) or control request (PCONTROL) to the slave program asking that the 
slave send data or control information back to the master 


e Check status (PCHECK) and terminate (PCLOSE) a slave program. 


Notice the striking similarity between this method of communication and the use of the MPE File 
System intrinsics FREAD and FWRITE. It is as though the master program is reading from or writing to 
a file -- a very intelligent file that is capable of making decisions, controlling input/output devices, 
and performing productive processing. 


PTOP INTRINSICS 


The following pages contain detailed descriptions of the PTOP intrinsics that were summarized in 
Tables 6-1 and 6-2. For convenience in locating specific items of information in this reference 
section, these detailed descriptions are presented in a format consistant with that used in the MPE 
Intrinsics Reference Manual. Also, since this part of the section will be used for repeated reference, 
the intrinsics are arranged in alphabetical sequence, rather than in the order of normal usage as they 
were presented in the summary tables. 


These PTOP intrinsics are callable from SPL, FORTRAN, Pascal, or COBOL II. To calla DSN/DS 
PTOP intrinsic from a program, use the following procedure: 


1. Refer to the intrinsic description to determine the parameter types and their positions in 
the parameter list. 


4. Declare the variables or array names to be passed as parameters by type at the beginning of | 
the program. 


3. Include the name of the PTOP intrinsic in an INTRINSIC declaration statement, or the 
language’s equivalent. 


4. Issue the intrinsic call at the appropriate place in your program. 
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ACCEPT 


(Slave callable) Accepts (and completes) the requests received by the 
preceding GET intrinsic call and returns an optional tag 
field to the remote master program. 


SYNTAX 





PARAMETERS 


itag integer array 
A twenty-word array used for transmitting a tag field. The format of the 
tag field is defined by the user’s master and slave programs. 

target integer array 
An array used for transmitting or receiving blocks of data. 


For PREAD requests, this array contains the block of data to be transmitted 
to the master program. 


For PWRITE requests, this array receives the block of data from the 
DSN/DS buffer. 


For POPEN and PCONTROL requests, this parameter has no meaning and 
should be omitted. 


teount integer by value 


An integer specifying the number of words (if positive) or bytes (if negative) 
to be transmitted or received. 


For PREAD requests, this parameter specifies how much data is to be 
transmitted from target to the master program. 


For PWRITE requests, this parameter specifies how much data is to be 
moved from the DSN/DS buffer to target. 


For POPEN and PCONTROL requests, this parameter has no meaning and 
should be omitted. 
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CONDITION CODES 


CCE Request completed successfully. 

CCG (Not returned. ) 

CCL An error occured. Issue a PCHECK intrinsic call to determine what 
happened. 

OPERATION 


The ACCEPT intrinsic accepts the request received by the most recent GET intrinsic call, completes the 
requested operation, and transmits an optional tag field back to the remote master program. 


In the case of a POPEN request, the ACCEPT call transmits an optional tag field (2tag) to the remote 
master program. 


In the case of a PREAD request, the ACCEPT call transmits the specified number of words or bytes 
(teount) from target to the master program and transmits an optional tag field (ttag) to the master 
program. 


In the case of a PWRITE request, the ACCEPT call moves the specified number of words or bytes 
(teount) from the DSN/DS buffer to target and transmits an optional tag field (ttag) to the master 
program. 


In the case of a PCONTROL request, the ACCEPT call transmits an optional tag field (tag) to the 
remote master program. 
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GET 


(Slave callable) 


SYNTAX 


Receives the next request from the remote master 
program. 


Lonumber]); 





FUNCTIONAL RETURN 


ifun 


0 


PARAMETERS 


ttag 


il 


integer 
An error occured. This value is returned only when the condition code 


CCL is also returned. Issue a PCHECK intrinsic call (with a dsnum 
parameter of zero) to determine what happened. 


POPEN request received. 
PREAD request received. 
PWRITE request received. 
PCONTROL request received. 


This value is returned only when the condition code CCG is also returned. 
It indicates that a pending MPE File System I/O without wait request was 
completed (instead of the expected remote DSN/DS I/O request). 
tonumber contains the file number associated with the completed I/O 
request. 


integer array 

A twenty-word array used for receiving a tag field. The format of the tag 
field is defined by the master and slave programs. 

integer 


A word that has meaning only when a PREAD or PWRITE request is received 
from the master program. 


tonumber 


GET Intrinsic 


For a PREAD request, iZ contains an integer specifying the number of words 
or bytes requested by the master program. 


For a PWRITE request, 22 contains an integer specifying the number of 
words or bytes transmitted from the master program to the DSN/DS buffer 
on the remote system. 

integer 

A word that has meaning only when the condition code CCG and an ifun 
of 5 are returned. In that case, tonumber contains the MPE File System 


file number associated with the completed I/O without wait request. 


Default: No file number is returned. 


CONDITION CODES 


CCE 


CCG 


CCL 


OPERATION 


Request received successfully. 


The implicit IOWAIT(0) call issued by the GET intrinsic completed a 
pending remote MPE File System I/O without wait request instead of a 
remote DSN/DS I/O request. tonumber contains the file number 
associated with the completed File System request. 


An error occurred. Issue a PCHECK intrinsic call to determine what 
happened. 


The GET intrinsic receives the next request from a local master program and accepts an optional tag 
field (available in itag). The GET intrinsic call implicitly issues an IOWAIT(O) intrinsic call. An 
ifun of 0 indicates that an IOWAIT error occurred. An ifun of 5 will occur only if you are 
executing MPE File System intrinsic calls without wait in your remote program and the implicit 
IOWAIT(0) call completes a pending File System 1/O request instead of the expected DSN/DS 1/O 
request (in this case, you will have to issue another GET call after processing the completed File System 
I/O request in order to receive the expected DSN/DS I/O request). 





You must not use IOWAIT calls within a program 
containing DSN/DS GET calls. If you were to use an | 
IOWAIT(0) call and it responded to a DSN/DS I/O 
request, your program would not be able to make any 
sense out of the information returned by the IOWAIT 
call. 
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(Slave and Master callable) Returns an integer code specifying the completion status 
of the most recently executed DSN/DS 
program-to-program intrinsic. 


SYNTAX 


teode: =PCHECK (dsnum) ; 





FUNCTIONAL RETURN 


When the PCHECK intrinsic executes, it returns to the calling program a number (icode) that specifies 
the completion status of the most recently executed DSN/DS program-to-program intrinsic. The 
various values of teode are shown in Appendix A under the heading "DSN/DS Functional Errors." 


PARAMETERS 


dsnum integer by value 


MASTER PROGRAM: The link identifier returned by the particular 
POPEN intrinsic that initiated communication 
with the remote slave program. 


SLAVE PROGRAM: 0 (zero); no link identifier is returned to a 
slave program. 


CONDITION CODES 


CCE PCHECK request successfully completed. 

CCG (Not returned.) 

CCL PCHECK request denied because dsnum was invalid. 
OPERATION 


The PCHECK intrinsic returns an integer value that specifies the completion status of the most recently 
executed DSN/DS program-to-program intrinsic. 


PCLOSE 


(Master callable) Terminates program-to-program communication with a 
remote slave program. 


SYNTAX 


PCLOSE(dsnum) ; 





PARAMETERS 


dsnum integer by value 


The line number returned by the particular POPEN intrinsic call which 
initiated communication with the remote slave program. 


CONDITION CODES 


CCE Successful completion. 
CCG (Not returned. ) 
CCL Request denied; an error occurred. Issue a PCHECK intrinsic call to 


determine what happened. 


OPERATION 


The PCLOSE intrinsic terminates the remote slave program associated with dsnum. The particular 
communications line remains open. 
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PCONTROL 


(Master callable) Exchanges tag fields with the remote slave program. 


SYNTAX 





PARAMETERS 

dsnum integer by value 
The link identifier returned by the particular POPEN intrinsic call which 
initiated communication with the remote slave program. 

itag integer array 


A twenty-word array used for transmitting and receiving a tag field. The 
format of the tag field is defined by the master and slave programs and 
may serve any purpose you desire. 


CONDITION CODES 


CCE Request accepted by remote slave program. 
CCG Request rejected by remote slave program. 
CCL Request denied; an error occurred. Issue a PCHECK intrinsic call to 


determine what happened. 


OPERATION 


The PCONTROL intrinsic transmits a tag field to the remote slave program and accepts one in return. 
The remote slave program must issue a GET intrinsic call followed by either an ACCEPT or REJECT call 
to complete the PCONTROL operation. Both the ACCEPT and REJECT calls transmit a tag field back to 
the master program. 


Although this intrinsic was designed specifically for the exchanging of tag fields, you will notice that 
itag is an optional parameter (it is also optional for the ACCEPT and REJECT slave 
program-to-program calls). If the master program did not transmit a tag field, the returned tag field 
(if any) is not accessible. 


The PCONTROL activity is illustrated in Figure 6-1. 


PCONTROL Intrinsic 


MASTER 
Send control request and optional 
tag field. 


PCONTROL 


DS/3000 
BUFFER 


Send optional 


tag field. 
ACCEPT 
REJECT 





Figure 6-1. PCONTROL Activity. 


POPEN 


(Master callable) Initiates program-to-program communication with a 
remote slave program. 


SYNTAX 





FUNCTIONAL RETURN 


When the POPEN intrinsic executes, it returns to the master program a number (dsnum) by which 
DSN/DS uniquely identifies the particular communications link. This number is analgous to the file 
number returned by the MPE FOPEN intrinsic in that it is used in all subsequent master 
program~-to-program intrinsic calls to reference the remote slave program. 


PARAMETERS 

dsdevice byte array 
Contains a string of ASCII characters terminated by a space. This string 
must be the device class name, logical device number, or node name used in 
the :DSLINE or :REMOTE HELLO command that opened the 
communications line you will be using. 

progname byte array 
Contains a string of ASCII characters terminated by a space. This string is 
the name (with optional group and account names) of an MPE program file 
(residing on a disc connected to the remote HP 3000) containing the remote 
slave program. 

itag integer array 
A twenty-word array that is used for transmitting and receiving tag fields. 
The format of the tag field is defined as part of the user’s application. 
Default: A tag field of all zeros is sent; the returned tag field (if 

any) is not available to the master program. 
entryname byte array 


Contains a string of ASCII characters terminated by a space. This string is 
the name of the entry point (label) at which execution of the remote slave 
program is to begin. 


Default: Primary entry point. 


param 


flags 


POPEN Intrinsic 


integer by value 
A word used to transfer control information to the new (remote) process. 
Any instruction in the outer block of code in the new process can access 


this information in location Q-4. 


Default: Word is filled with zeros. 


logical by value 


A word whose bits, if on, specify the loading options for the slave program: 


NOTE 


Bit groups are denoted using the standard SPL notation. 
Thus bit(15:1) indicates bit 15, bits(10:3) indicates bits 
10, 11, and 12. 


Bit(1 5:1) - (Always set on.) 

Bit(14:1) - LOADMAP bit. If on, a listing of the allocated (loaded) program 
is produced on the job/session list device. This map shows the Code 
Segment Table (CST) entries used by the new process. If off, no map is 
produced. 

Default: Off. 

Bit(13:1) - DEBUG bit. Bit must be off (0) -- no breakpoint can be set. 
Default: Off. 

Bit(1 2:1) - If on, the slave program is loaded in non-privileged mode. If 
this bit is off, the program is loaded in the mode specified when the 


program file was prepared. 


Default: Off. 


POPEN Intrinsic 


Bits(10:2) - LIBSEARCH bits. These bits denote the order in which remote 

libraries are to be searched for the slave program: 

00 System Library 

01 - Account Public Library, followed by System Library. 

10- Group Library, followed by Account Public Library and System 
Library. 

Default: 00 

Bit(9:1) - NOCB bit. If on, file system control blocks are established in an 

extra segment. If off, control blocks may be established in the Process 


Control Block Extension (PCBX) area. 


Default: Off. 


NOTE 


This bit should be set on if the slave program uses a large 
stack. 

Bits(7:2) - Reserved for MPE. Should be set to zero. 

Bits(5:2) - STACKDUMP bits. Bits must be off (00). 

Default: 00 


Bit(4:1) - Reserved for MPE. Should be set to zero. 


NOTE 


The following bits (0:4) are ignored, because the bit pair 
(5:2) must be 00. 


Bit(3:1) - DL to QI bit. If on, the portion of the stack from DL to QI is 
dumped. If off, this portion of the stack is not dumped. 
Default: Off. 


Bit(2:1) - QI to S bit. If on, the portion of the stack from QI to S is 
dumped. If off, this portion of the stack is not dumped. 


stacksize 


dlsize 


maxdata 


bufsize 


POPEN Intrinsic 


Default: Off. 


Bit(1:1) - Q-63 to S bit. If on, the portion of the stack from Q-63 to S is 
dumped. If off, this portion of the stack is not dumped. 


Default: Off. 


integer by value 


An integer (Z - Q) denoting the number of words assigned to the local stack 
area bounded by the initial Q and Z registers. 


Default: The same as that specified in the program file. 


integer by value 


An integer (DB - DL) denoting the number of words in the user-managed 
stack area bounded by the DL and DB registers. 


Default: The same as that specified in the program file. 


integer by value 


The maximum size allowed for the process stack (Z - DL) area in words. 
When specified, this value overrides the one established at 
program-preparation time. 


Default: If not specified, and not specified in program file either, 
MPE assumes that the stack will remain the same size. 


integer by value 


The size in words of the communications buffer (DSN/DS buffer) that is to 
be established by the remote DSN/DS software. It has a maximum value of 
4096 words. Note that this parameter defines the maximum number of 
words of data that can be transmitted by a PWRITE or PREAD intrinsic call. 


Default: Same size as the line buffer defined by the :DSLINE 
command (LINEBUF=) for the first : DSLINE issued to the 
dsdevice. Will never be smaller than 304 words. 


If no LINEBUF= is specified by the first :DSLINE 
command, then the default configuration length is used. If 
X.25 is being used, the default configuration length will be 
138. 


POPEN Intrinsic 


CONDITION CODES 


CCE Request accepted by remote slave program. 
CCG Request rejected by remote slave program. 
CCL Request denied; an error occurred. Issue a PCHECK intrinsic call to 


determine what happened. 


OPERATION 


The POPEN intrinsic creates and activates a process in the remote HP 3000 for the specified remote 
slave program (progname) and optionally transmits a tag field (ttag) to that remote slave program. 
The remote slave program must issue a GET intrinsic call followed by either an ACCEPT or REJECT call 
to complete the POPEN operation. The remote slave program may transmit a tag field back to the 
master program as part of an ACCEPT or REJECT call. If the master program transmitted a tag field, 
then the returned tag field (if any) is available in itag. If the master program did not transmit a tag 
field, then the returned tag field (if any) is not accessible. 


The bufsize parameter specifies the length in words of an area to be established by the remote 
DSN/DS software as a communications buffer. This buffer is established implicitly as part of the GET 
call that receives the POPEN request. The value will be the maximum size of a PREAD or PWRITE data 


buffer. 
NOTE 


The master program is limited to one slave program on 
each line. Thus, only one POPEN (to a given node) is 
permitted, assuming only one line connects the two 
systems. After a POPEN intrinsic call, the remote slave 
program remains activated, and both the 
communications link and the DSN/DS buffer remain 
intact, even if the POPEN request is rejected by the 
remote slave program. The meaning of a POPEN reject 
by the remote slave program must be established as part 
of the design of the user’s application. 


The POPEN activity is illustrated in Figure 6-2. 


POPEN Intrinsic 


Going to graphics 


1) Create and activate a process for 
(HP 3000) the remote slave program. (HP 1000) 


MASTER SLAVE 
2) Send optional tag field. 


DS/3000 
BUFFER 


Send optional 
tag field. 


ACCEPT 
REJECT 





Figure 6-2. POPEN Activity. 


PREAD 


(Master callable) Asks the remote slave program to return a block of data. 


SYNTAX 


Lgth:=PREAD(dsnum, target ,teount [, itag]); 





FUNCTIONAL RETURN 


The PREAD intrinsic returns a positive integer value showing the length ( Lgth) of the information 
transferred. If the tcount parameter in the PREAD call was positive, the positive value returned 
represents a word count; if the tcount parameter was negative, the positive value returned represents 
a byte count. 


PARAMETERS 
dsnum integer by value 
The link identifier returned by the particular POPEN intrinsic call which 
initiated communication with the remote slave program. 
target integer array 
The array into which data received from the remote slave program will be 
deposited. 
teount integer by value 
The requested number of words (if positive) or bytes (if negative) of data 
ttag integer array 


A twenty-word array used for transmitting and receiving a tag field. The 
format of the tag field is defined by the master and slave programs and 
may serve any purpose the user desires. 


CONDITION CODES 


CCE Request accepted by remote slave program. 
CCG Request rejected by remote slave program. 
CCL Request denied; an error occurred. Issue a PCHECK intrinsic call to 


determine what happened. 
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OPERATION 


The PREAD intrinsic transmits a read request to the remote slave program and optionally transmits 4 
tag field from ttag to the remote slave program. The remote slave program must issue a GET 
intrinsic call followed by either an ACCEPT or REJECT call to complete the PREAD operation. The GET 
call moves the tag field from the master program into the itag field provided in the remote slave 
program. The ACCEPT call moves the requested block of data from the remote program’s data buffer 
into the target in the master program, and it also sends the optional ztag back to the master program. 
The REJECT call transmits no data; it only returns the optional tag field. If the master program did 
not transmit a tag field, the returned field Gf any) is not accessible. 


The PREAD activity is illustrated in Figure 6-3. 
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Figure 6-3. PREAD Activity. 
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PWRITE 


(Master callable) Sends a block of data to the remote slave program. 


SYNTAX 





PARAMETERS 
dsnum integer by value 
The link identifier returned by the particular POPEN intrinsic call which 
initiated communication with the remote slave program. 
target integer array 
The array from which data will be transmitted to a remote slave program. 
teount integer by value 
The requested number of words (if positive) or bytes (if negative) of data. 
itag integer array 


A twenty-word array used for transmitting and receiving a tag field. The 
format of the tag field is defined by the master and slave programs and 
may serve any purpose the user desires. 


CONDITION CODES 


CCE Request accepted by remote slave program. 
CCG Request rejected by remote slave program. 
CCE Request denied; an error occurred. Issue a PCHECK intrinsic call to 


determine what happened. 


OPERATION 


The PWRITE intrinsic transmits a block of data (number of words or bytes = tcount) from target to 
the DSN/DS buffer in the remote HP 3000, and optionally transmits a tag field from ttag to the 
remote slave program. The remote slave program must issue a GET intrinsic call followed by either an 
ACCEPT or REJECT call to complete the PWRITE operation. The GET call moves the tag field from the 
master program into the itag field provided in the remote slave program. The ACCEPT call moves 
the data from the remote DSN/DS buffer into the remote slave program’s buffer, and it also sends the 
optional 2 tag back to the master program. The REJECT call refuses the write request (the data in the 
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DSN/DS buffer is no longer accessible to the slave program) and returns the optional tag field to the 
master program. 


The PWRITE activity is illustrated in Figure 6-4. 


(HP 3000) (HP 1000) 
(data) 


PWRITE : . 
Send write request, optional 
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tag field. \ 
USER’S 
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REJECT 
(data lost to user’s program) 





Figure 6-4, PWRITE Activity. 
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REJECT 


(Slave callable) Rejects the request received by the preceding GET 
intrinsic call and returns an optional tag field to the 
remote master program. 


SYNTAX 


REJECT ([itag]); 





PARAMETERS 


itag integer array 


A twenty-word array used for transmitting a tag field. The format of the 
tag field is defined by the user’s master and slave programs. 


CONDITION CODES 


CCE Response transmitted successfully to the remote master program. 

CCG (Not returned). 

CCL An error occurred. Issue a PCHECK intrinsic call to determine what 
happened. 

OPERATION 


The REJECT intrinsic rejects the request received by the most recent GET intrinsic call and transmits | 
an optional tag field (1 tag) back to the remote master program. 
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INTERFACING WITH COBOL AND BASIC 


Access to the program-to-program communications capability is available to ANS COBOL (COBOL/I) 
and BASIC users only through the interface routines described in Appendices B and C, respectively. 


Programs written in SPL, FORTRAN, and COBOL II/3000 can use the PTOP intrinsics described in 
this section. 


PTOP EXAMPLE 


This example shows how two programs can communicate with one another by using the master and 
slave program-to-program intrinsics. The comments included within each program tell what is 
happening. 


Master Program 


1 
2 


OON ODO ol BW 


10 


12 
13 
14 
15 
16 
17 
18 
19 


21 
22 
es 
24 
25 


rat 
28 


30 
31 
32 
33 


$CONTROL USLINIT,ADR,MAP,CODE 
BEGIN 


COMMENT 
NAME OF PROGRAM IS MASTERP. 
THE SOURCE IS MASTERS. 
THIS PROGRAM IS TO BE RUN ON THE MASTER CPU. IT WILL START 
THE "SLAVEP" PROGRAM ON THE SLAVE CPU. THE PROGRAM WILL THEN 
RECEIVE A KNOWN TEST PATTERN FROM THE USER TERMINAL, WRITE IT 
TO THE REMOTE DISC FILE, READ IT BACK 5 TIMES, AND PRINT IT 
ON THE LOCAL LP 5 TIMES. 
THE TRANSFER OF DATA IS DONE THRU PTOP.3; 


INTEGER 
ERROR, 
LINE’ NUM, 
I, 

J, 

LPDEV NUM; 


BYTE ARRAY DS’DEVICE(0:6):=" "3 

BYTE ARRAY LPDEV(0:2):="LP °; 

BYTE ARRAY LPFILE(0:6):="LPFILE °; 

BYTE ARRAY MSG(0:79); 

BYTE ARRAY PROG’NAME(0:19):="SLAVEP.PUB.SUPPORT °; 


LOGICAL ARRAY IOBUF (0:39); 

LOGICAL ARRAY ITAG(0:19):=20(%020040) ; 
LOGICAL ARRAY MSGW(#*)=MSG; 

LOGICAL ARRAY DS’DEVW(*)=DS “DEVICE; 
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34 
35 
36 
37 
38 
39 
40 
4} 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 


INTRINSIC DEBUG, FCLOSE,FOPEN,FWRITE,PCONTROL; 
INTRINSIC PCLOSE,POPEN, PREAD, PRINT, PWRITE, READ; 


MOVE MSG:=" INPUT NAME OF DSDEVICE"; 
PRINT (MSGW, -28,0); 
READ(DS ’DEVW,-7); 


MOVE MSG:=" POPEN ISSUED"; 
PRINT (MSGW,-18,0); 


LINE” NUM: =POPEN(DS “DEVICE, PROG’ NAME ,ITAG) ; 
IF <> THEN 


BEGIN 
PRINT (ITAG, 20,0); 
ERROR := 1; 
GO TO ERR’ PROC; 
END 
ELSE 
PRINT(ITAG, 20,0); 


MOVE MSG:=" POPEN COMPLETED SUCCESSFULLY"; 
PRINT (MSGW, -33,0); 


LPDEV “NUM: =FOPEN(LPFILE,4,1,40,LPDEV) ; 
IF <> THEN BEGIN ERROR:=2;GO TO ERR’PROC; END; 


MOVE MSG:="IN PUT TEST RECORD MAX. 80 CHAR"; 
PRINT (MSGW, -30,0); 


MOVE IOBUF:=" "; <<CLEAR OUT BUFFER AREA>> 
MOVE IOBUF (1):=IOBUF , (39); 


READ(IOBUF ,-80); <<GET RECORD TO WRITE>> 


PWRITE(LINE’NUM,IOBUF 40); <<SEND RECORD TO REMOTE>> 
IF <> THEN BEGIN ERROR: =3;GO TO ERR’PROC; END; 


MOVE MSG:=" DISC FILES BEING XFERRED FROM REMOTE"; 


PRINT (MSGW, -41,0); 
J:=-13 <<START READING FROM REMOTE>> 
WHILE (J:=J+1)<5 DO 
BEGIN 
MOVE MSG:=" PREAD ISSUED"; 
PRINT (MSGW,-19,0); 


MOVE IOBUF:=" "; 
MOVE IOBUF (1) :=IOBUF, (39); 


I:=PREAD(LINE’NUM, IOBUF ,40,ITAG) ; 


IF = THEN 
BEGIN 
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88 IF J=4 THEN 

89 BEGIN 

90 MOVE MSG:=" ALL DISK RECORDS XFERRED' ; 
91 ; PRINT (MSGW, -29,0); 

92 END; 

93 END 

94 ELSE 

95 BEGIN ERROR:=4;GO TO ERR’PROC; END; 

96 FWRITE (LPDEV’NUM,IOBUF ,1,0); 

97 IF <> THEN BEGIN ERROR:=4;GO TO ERR’ PROC;END; 
98 END; 

99 


100 FCLOSE(LPDEV’NUM,0,0); 

101 PCLOSE(LINE’NUM) ; 

102 IF <> THEN BEGIN ERROR:=5;GO TO ERR’ PROC;END; 
103 MOVE MSG:="END OF MASTER PROGRAM" ; 

104 PRINT(MSGW,-21,0); GO TO END’IT; 


105 
106 ERR’PROC: <<HANDLE ERROR CONDITIONS>> 
107 DEBUG; 


108 FCLOSE(LPDEV’NUM,0,0); 

109  PCLOSE(LINE’NUM); 

110 MOVE MSG:="ERROR, END MASTER PROGRAM" ; 
114 PRINT (MSGW, -25,0); 

112 

113 END’IT: END. 


Slave Program 
1 $CONTROL USLINIT,ADR,MAP, CODE 
2 


3 BEGIN 

4 COMMENT 

5 THE NAME OF THIS PROGRAM IS SLAVEP. 

6 THE NAME OF THE SOURCE IS SLAVES. 

< THIS PROGRAM IS TO BE COMPILED AND PREP’ED ON THE 

8 SLAVE HP3000 SYSTEM. IT WILL BE INITIATED FOR EXECUTION 
9 BY THE MASTER. THE FUNCTION OF THIS PROGRAM IS TO 

10 LOAD A DISC FILE WITH 5 KNOWN TEST PATTERNS THAT WILL 
11 BE TRANSFERRED TO THE MASTER 5 TIMES AND PRINTED ON THE 
12 MASTER’S LINE PRINTER 5 TIMES; 


13 

14 

15 INTEGER 

16 ERROR, 

17 DISK’FILENUM, 
18 Ps 

19 IL, 

20 IONUMBER, 

21 J3 

22 


23 BYTE ARRAY MSG(0: 79); 
24 BYTE ARRAY TEST(0:4):="TEST "; 
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25 

26 LOGICAL ARRAY DISK’ BUF (0:39); 

27 LOGICAL ARRAY ITAG(0:19):=20(020040); 
28 LOGICAL ARRAY MSGW(#)=MSG; 

29 

30 INTRINSIC FOPEN ,DEBUG,FWRITEDIR,FREADDIR,FCLOSE; 
31 INTRINSIC GET,ACCEPT,PRINT,READ,REJECT; 
32 

33 

34 IL:=40; 

35 MOVE MSG:="ISSUING A GET (REMOTE)"; 

36 PRINT(MSGW,-22,0); 

37 I:=GET(ITAG); <<GET FOR POPEN>> 


38 IF < THEN 

39 BEGIN 

40 MOVE ITAG:="ERROR ON GET;POPEN"; 
41 GO TO ERR’ PROC; 

42 END; 

43 

44 IF I=1 THEN 

45 BEGIN 

46 MOVE MSG:="POPEN RCVD...ISSUING AN ACCEPT (REMOTE)"; 
47 PRINT (MSGW, -39,0); 

48 ACCEPT(ITAG); <<ACCEPT FOR POPEN>> 
48 END; 

50 


51 MOVE ITAG:="POPEN ACCEPT SUCCESSFUL (REMOTE)"; 


53 DISK’ FILENUM: =FOPEN(TEST,4,%104,-80,,,,1,1,10D); 
54 IF <> THEN BEGIN ERROR:=1;GO TO ERR’PROC; END; 


96 I:=GET; <<TEST REC FROM MASTER>> 
S? IF <> THEN BEGIN ERROR:=2; GO TO ERR’PROC; END; 
58 IF I=3 THEN <<PWRITE RECEIVED>> 


59 BEGIN 

60 ACCEPT( ,DISK’ BUF); 

61 IF <> THEN BEGIN ERROR:=3; GO TO ERR’PROC; END; 
62 END; 

63 

64 


65 I:=-13; <<START WRITING TEST FILE>> 
66 WHILE(I:=I+1) < 5 DO 
67 BEGIN <<WRITE REC TO DISK>> 


68 FWRITEDIR(DISK’FILENUM, DISK’ BUF ,40,DOUBLE(I)); 

69 IF <> THEN BEGIN ERROR:=4; GO TO ERR’PROC; END; 
70 

71 END; <<END WRITING TEST FILE>> 

t2 


3 J:=-13 <<SEND DISK FILE TO MASTER>> 
74 WHILE (J:=J+1)<5 DO 


75 BEGIN 

16 MOVE MSG:="ISSUING A GET (REMOTE)"; 
7 PRINT (MSGW, -22,0); 

78 1:=GET(ITAG,IL,IONUMBER) ; 
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79 
80 
81 
82 


83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 
100 


IF < THEN BEGIN ERROR:=5; GO TO ERR’ PROC; END; 
IF I=2 THEN 
BEGIN 


MOVE MSG:="PREAD RCVD...ISSUING AN ACCEPT"; 


(REMOTE) "; 
PRINT (MSGW, -39,0) ; 
END 
ELSE 
BEGIN ERROR:=6;GO TO ERR’PROC; END; 
MOVE DISK’ BUF :=%020040; 
MOVE DISK’ BUF (1):=DISK’ BUF (0), (39); 
FREADDIR(DISK’ BUF ,40,DOUBLE(J)); 
IF <> THEN BEGIN ERROR:=7;GO TO ERR’PROC; END; 
ACCEPT (ITAG, DISK’ BUF , 40) ; 
IF <> THEN BEGIN ERROR:=8;GO TO ERR’ PROC; END; 


END; 
FCLOSE(DISK’ FILENUM,0,0); GO TO END’IT; 


ERR’PROC: <<HANDLE ERROR CONDITIONS>> 
DEBUG; <<WILL PROMPT AT MASTER SIDE TERMINAL >> 
REJECT 3 
:=GET; <<ALLOW PCLOSE>> 


101 GO TO ERR’ PROC; 


102 


103 END’IT: END; 
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SECTION 


NETWORK FILE TRANSFER 





~p 


The Network File Transfer (NFT) program runs on an HP 3000 Computer System to provide the 
ability to copy disc files efficiently. When initiated over a DSN/DS communications link, the NFT 
program can copy a file to or from any other adjacent HP 3000 computer which also provides this 
service. 


FEATURES OF NFT 


e You can initiate copy operations from sessions, jobs, or programs. 


e DSCOPY can be used to copy users’ files and MPE system files, as well as data management files, 
such as KSAM/3000 files. 


e There is only one NFT command to learn -- :DSCOPY. 


e There are two intrinsics: DSCOPY and DSCOPYMSG. The intrinsics are callable from programs 
written in SPL, COBOL, Pascal, FORTRAN, and BASIC. 


e NET can be used in Interactive Mode to submit a series of copy requests. When a DSCOPY 
command or intrinsic initiates Interactive Mode, users’ requests are placed in a transaction file 
whose formal designator is DSCOPYI. The default for this file is $STDINX. This file must be 
unnumbered. 


e NFT can record a history of all copy operations performed by DSCOPY requests. The history 
report can be printed to $STDLIST, as well as to a secondary file. 


e You can initiate a copy operation from a system other than the system(s) where the source and 
target files are located. 


e NFTcanefficiently copy disc files within your local HP 3000. 


e The files referenced by a DSCOPY command (or intrinsic) may reside on system or private 
volumes. 


File transfers can involve one or more computers. In all transfers, there are three distinct roles a 
system can play: 


1. The initiator is always the system where the :DSCOPY command originates. The initiator 
functions only in an outgoing sense. It is similar to PTOP operation, where the PTOP 
master program always issues a POPEN out across a DS line to cause a slave to be created 
and activated on a remote system. . 


2. The producer is the source computer where the file that is to be copied resides. 


3. The consumer is the target computer where the new file will reside. 
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You should remember that one system may be performing two or all three of these roles. 


When a DSCOPY request names a remote source, the DS line to that computer must be open and a 
remote session must exist. The same is also true when a remote target is specified. 


When DSCOPY is used to transfer files over two or more systems, the following restrictions apply: 


1. DSCOPY must be initiated only from the master side of the DS line. The slave (remote) side 
cannot be the initiator of a DSCOPY command. 


2. DSCOPY must not be initiated programmatically from either a master or a slave PTOP 
program in any direction. 
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‘DSCOPY 


SYNTAX 


: DSCOPY {tsource! Ky target 1] 





where the command syntax has the following meanings: 


source -- sdev 


# 


> 


[tdev] 
# 


target ae 





To submit a series of transfer requests, omit all of the source and target parameters to initiate 
Interactive Mode. NFT prompts you for input and, after the transfer completes, prompts you again 
for the next transfer request. 


Terminate Interactive Mode by typing // or (CONTROL)Y. 
PARAMETERS 


_sfile Identifies the file to be copied. The name can be written in the following 
format: 


sfile[\lockword] [.groupname] [ .accountname | 
If the source file is ina group.account different from the requestor’s 
log-on group.account, the requestor must have read and lock access to 


the source file. (Lock access means that the file cannot be opened for 
writing while : DSCOPY is copying it.) 


sdsdev The device classname, logical device number, or node name that was used to 
open the communications link to the remote computer where the source file 
resides. 


Default: The local system (that is, the system where the transfer 
request is submitted). 
sdev The classname or logical device number of the disc where the source file 
resides. 


Default: DISC. 
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tfile 


tdsdev 


tdev 


USE 


Available 


Breakable? 


* 


Specifies the file to receive the data. The name can be written in the 
following format: 


tfile[\lockword][.groupname][.accountname] 


Default: The new file has the same filename as the source file. The 
default groupname and accountname are the log-on 
groupname and accountname. Security is on for the new 
file, even though the source file may have been released. 


The device classname, logical device number, or nodename that was used to 
open the communications link to the remote computer where the target file 
will reside. 


Default: : DSCOPY copies the sourcefile to the local computer and 
assigns the same filename as the sourcefile name. If the 
source computer 1s the local system, this default causes a 
file system error (because the file already exists). 


Means the target dsdevice (the target computer) is the same as the source 
dsdevice (the source computer). 


The device classname or logical device number of the disc where the new 
file should reside. 


Default: DISC 
in Session? YES 
in Job? YES 
in Break? NO 
Programmatically? No* 
No** 


Call the DSCOPY intrinsic rather than use the COMMAND intrinsic. 


** Use (CONTROL)Y, rather than (BREAK). 
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OPERATION 


NOTE 


is disabled during DSCOPY. 


If you enter (CONTROLJY during a copy operation, DSCOPY 
prints the percentage of the transfer that is complete 
and prompts whether to cancel or continue the 
operation. 


Source and Target Files 


In a DSCOPY command, source and target files are referenced as defined by the systems upon which 
they reside. 


There is no default for a sourcefile. 


A default for a targetfile is derived from the sourcefile. The default consists of the first sequence of 
characters in the sourcefile name which constitutes a legal HP 3000 file name. For example: 


:DSCOPY SFILE.SGROUP,SNODE 


Here the source file is SFILE (in group SGROUP on a remote system). The targetfile is generated in the 
users’ log-on group (on the local system) and is assigned the default name SFILE. The characteristics 
of the new file are the same as those of the source file. 


If a source file has a negative file code, the user requesting the transfer must have Account Manager 
(AM), System Manager (SM), or Privilege Mode (PM) capability to be allowed to copy the file. The 
log-on user on the target node must also have AM, SM, or PM capability. Remember that the person 
requesting the transfer (the initiator) is not necessarily the consumer (the log-on user at the target). 
After a successful copy operation, the new file has the same negative file code as the source file. 


When copying KSAM files, both the data file and its key file are copied. The DSCOPY user can 
specifically name a data file/key file pair by enclosing the file names in quotes and separating them 
by a comma. For example: 


:DSCOPY SFILE TO “DATAFILE,KEYFILE™ 


When a user specifies a source KSAM data file and the NFT subsystem must generate a default key 
file, it uses the data file name and appends a K. For example: 


:DSCOPY SFILE, LINE1 TO TFILE, LINE2 


In the case where SFILE is a KSAM data file, the new data file on the computer connected to LINE2 
will be named TFILE and the associated key file will be named TFILEK by default. 
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Interactive Mode 


To execute a series of transactions, enter the :DSCOPY command without parameters. Now the system 
prompts you for input with the word DSCOPY and accepts your response from the file DSCOPYI (whose 
default is $STDINX). This file must be unnumbered. 


The syntax required for your response follows the format already described for source and target 
parameters. 


You can issue MPE comands while in Interactive Mode by entering a colon (:) before the command. 
The MPE commands allowed in Interactive Mode are those allowed by the COMMAND intrinsic. 


Note the following about Interactive Mode: 


e To continue your response on the next line, enter an ampersand (&) as the last non-blank 
character on the current line and press (RETURN). A continuation prompt is printed so that you 
can continue your response. 


¢ To cancel a response while entering a line, use (CONTROL)Y. 


e To terminate Intractive Mode, enter // or (CONTROL)Y. 


Event Recording 


DSCOPY produces printed output to document user input and copy results. This output may be sent to 
a primary file and/or a secondary file, either of which may be disabled. The primary file is 
$STDLIST and the secondary file has the formal designator DSCOPYL. All user requests and DSCOPY 
prompts are printed on $STDLIST and echoed on the secondary file (and on the primary, if not 
duplicative). Primary output is enabled by a DSCOPY command, or by the :DSCOPY intrinsic with the 
OPT parameter set to 4, 5, or 6 (refer to the parameters of the DSCOPY intrinsic). Output for the 
secondary file, DSCOPYL, defaults to $NULL so that secondary output is disabled by default. It can be 
enabled by using a :F ILE command to equate DSCOPYL to a file or a line printer, or to $STDLIST. 


‘DSCOPY 


EXAMPLES 


Local Copy 


To make a local copy of SFILE and name the new file TFILE, use either of the following: 


:DSCOPY SFILE TO TFILE or :DSCOPY SFILE; TFILE 





LOCAL 


The following example copies a file named SFILE from another group on the local system (SGROUP) 
into a file in the log-on group. The new file is also named SFILE. 


:DSCOPY SFILE.SGROUP 
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Remote-to-Local Copy 


To copy a file from the computer connected to DS line SYSA into your log-on group (on the local 
system), enter: 


:DSCOPY SFILE,SYSA;TFILE 


LOCAL 






| k SYSB 


REMOTE 


7-8 


-DSCOPY 


Local-to-Remote Copy 


To copy a file named SFILE (on the local system) to the computer attached to DS line SYSB and name 
the new file SFILE, enter: 


:DSCOPY SFILE TO ,SYSB 


LOCAL 






SFILE 


| SYSB 


REMOTE 
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Remote Copy 

An asterisk (#) means the target system is also the source system. The following example copies a file 
named SFILE to a new file named TFILE. Both files reside on the remote computer connected to the 
dsline named SYSA. 


:DSCOPY SFILE,SYSA TO TFILE,# 


LOCAL 


[~ coaertaaing | 
| TFiLE | 
| 


Se | 





REMOTE 


:DSCOPY 


Remote-to-Remote Copy 
The next example illustrates a command that copies a file from one remote system to another. In this 
case, the communications lines to both remote computers must be open and a remote session must exist 


on each system. 


:DSCOPY SFILE,SYSA TO TFILE,SYSB 







REMOTE 


REMOTE 


Network File Transfer 
PROGRAMMATIC MODE 


Programs can use the DSCOPY intrinsic to copy disc files. 


Programs can also print a message which corresponds to the result code returned by a DSCOPY intrinsic 
call. The DSCOPYMSG intrinsic is used for this purpose. 


is disabled during DSCOPY. After you finish with the DSCOPY intrinsic, you must call 
FCONTROL 15 to set back on. See the MPE Intrinsics Manual for details. 


The rules for using the intrinsics are consistent with those for using other MPE intrinsics. 
Specifically, the following rules apply. 


¢ Both intrinsics can be called from programs written in the SPL/ 3000, COBOL, Pascal, FORTRAN 
and BASIC languages. 


> 


e Calling sequences for all of the languages are basically the same. 

e All parameters are passed by reference. 

e The intrinsics are not option variable. 

e Neither of the intrinsics are typed (returns a parameter as its value). 
e Neither returns a condition code (they both return a result). 

e Split stack calls are not allowed. 


e For COBOL, data types should be defined as follows: 


Date Type Data Description 
Numeric PICTURE S9(4) COMPUTATIONAL 
Alphanumeric PICTURE X(n) or PICTURE A(n) 
Numeric Array PICTURE S9(4) COMPUTATIONAL SYNCHRONIZED OCCURS n 
TIMES 


DSCOPY Intrinsic 


Allows programmatic use of DSCOPY 


SYNTAX 


DSCOPY (opt, spec, result); 





PARAMETERS 
opt logical 
opt controls the primary output (i.e. output to $STDLIST) and specifies the 
type of copy operation. 
Bits 0 through 12 are reserved for future use and should be set to zero. 
The remaining bits can be set to indicate the following: 
Value Meaning 

0 Single transaction; primary output disabled. 

l Multiple transactions; return after first 
unsuccessful transaction; primary output 
disabled. 

2 Multiple transactions; return after all 
transactions have been attempted or after an 
internal error occurs; primary output disabled. 

4 Single transaction; primary output enabled. 

5 Multiple transactions; return after first 
unsuccessful transaction; primary output 
enabled. 

6 Multiple transactions; return after all 
transactions have been attempted or after an 
internal error occurs; primary output enabled. 

spec logical array 


The logical array should contain ASCII text terminated by an 8-bit binary 
zero. In the single transaction case, the syntax required is the same as for 
the DSCOPY command parameters. 


In the multiple transaction case, the array should contain only a zero. Zero 
causes NFT to read the copy request from the DSCOPYI file (whose default 
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is $STDIN). This file must be unnumbered. 


result logical array 


A two-word array returned to the caller that indicates the outcome of the 
intrinsic call. 


result (0) Indicates the copy operation was successful. 
Any other value represents an error as defined in 
"DSCOPY Error Messages" listed in Appendix A. 


result(1) Shows the number of files that were 
successfully copied. 


OPERATION 


Simultaneous DSCOPY requests cannot be issued from two processes in the same session. 
The only valid values for the opt parameter are: 0, 1, 2, 4, 5, or 6. 

The ASCII text passed by the spec parameter must be terminated by a binary zero. 
The values passed in the parameters are verified as being in bounds and valid. 

The system creates the NFT process and passes the contents of opt and spec to it. 
The specified files are copied by the NFT process. 


The intrinsic returns the result to the user. 


EXAMPLES 


COBOL Calling Sequence 

CALL "DSCOPY" USING OPT, SPEC, RESULT. 
OPT Numeric data item. 

SPEC Alphanumeric data item. 


RESULT Numeric array of two or more data items. 


FORTRAN Calling Sequence 


CALL DSCOPY (OPT, SPEC, RESULT) 


OPT INTEGER#*2 variable 
SPEC CHARACTER array 


RESULT An array of two or more INTEGER#2 variables 


BASIC Calling Sequence 


CALL BDSCOPY (0, S$, R) 


0 Numeric variable 
S$ A string variable 
R An array of two or more numeric variables 


Pascal Calling Sequence 


PROCEDURE DSCOPY (OPT, SPEC, RESULT); INTRINSIC 
OPT: SHORTINT 3 
SPEC: PACKED ARRAY OF CHAR; 
RESULT: INTEGER; 


DSCOPYMSG Intrinsic 


Prints the result code returned by DSCOPY. 


SYNTAX 


DSCOPYMSG (result, fnum, r); 





PARAMETERS 
result logical array 
The two-word result returned by the DSCOPY intrinsic. 
0 = DSCOPY was successful. 
n= An error occurred. Refer to the Error Messages in Appendix A. 
fnum integer by value 
When fnum=0, the message associated with result is printed on $STDLIST. 
When fnum contains a file number returned by an FOPEN call, the message 
associated with result is written to the file. 
r Result returned by this DSCOPYMSG call. 
0 = Successful call 
n = Unsuccessful call. Refer to the Error Messages in Appendix A. 
EXAMPLES 


COBOL Calling Sequence 

CALL “DSCOPYMSG" USING RESULT, FNUM, R. 
RESULT An array of two or more data items. 
FNUM A numeric data item. 


R A numeric data item. 


FORTRAN Calling Sequence 
CALL DSCOPYMSG (RESULT, FNUM, R) 
RESULT An array of two or more INTEGER#??2 variables. 


FNUM INTEGER*? variable 
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R INTEGER#?? variable 


BASIC Calling Sequence 


CALL BDSCOPYMSG (R, F, RO) 


R An array of two or more numeric variables 
F An integer variable 
RO An integer variable 


Pascal Calling Sequence 


PROCEDURE DSCOPYMSG (RESULT, FNUM, R); INTRINSIC 
RESULT: INTEGER; 
FNUM: SHORTINT; 
R:SHORTINT; 


PROGRAMMATIC EXAMPLES 


A very simple example of a programmatic DSCOPY request is shown coded in the COBOL, FORTRAN, 
and BASIC languages. 


The example copies a file (NFTTESTS) to a new file (TEMP1). The source file resides on the local 
machine, and the new file will be created on a remote machine connected to line "HDS." 


DSCOPY COBOL Example 


$CONTROL CODE 

$TITLE “ DSCOPY INTRINSIC TEST" 

IDENTIFICATION DIVISION. 

PROGRAM-ID. DSCOPYOO. 

AUTHOR. SUZANNE FLAHERTY. 

DATE-WRITTEN. APRIL 1980. 

DATE-COMPILED. 

REMARKS. 

THIS PROGRAM DOES A SIMPLE DSCOPY INTRINSIC CALL. 
ENVIRONMENT DIVISION. 
ONFIGURATION SECTION. 

SOURCE-COMPUTER. HP3000 

OBJECT-COMPUTER. HP3000 

DATA DIVISION. 

WORKING-STORAGE SECTION. 

O01 OPT PIC S9(4) COMP VALUE 0. 

01 STRING1. 

02 ASCIIPART PIC X(24) VALUE "NFTESTS TO TEMP1,HDS". 
O02 TERMINATOR PIC S9(4) COMP VALUE 0. 

01 RESULT1. 
02 RESULT2 PIC S9(4) COMP OCCURS 2 TIMES. 
-1 PROCEDURE DIVISION. 
-2 BEGINLABEL. 
-3 CALL INTRINSIC "“DSCOPY" USING OPT, STRING1, RESULT1. 
-4 STOP RUN. 


OBDNOUMAWNH—- ONO OWON OW BWP = 
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DSCOPY FORTRAN Example 


25 $CONTROL MAP,LIST,CODE,CROSSREF , LOCATION ,STAT 
26 PROGRAM DSCOPY 

27 CHARACTER*40 STRING1 

28 INTEGER*2 FNUM 

29 INTEGER*2 OPT 

30 INTEGER ARRAY IRESULT(4) 

31 SYSTEM INTRINSIC DSCOPY, DSCOPYMSG 

31 C 

33 DATA STRING1/" NFTTEST TO TEMP1,HDS "/ 

34 C 

35 C THIS PROGRAM DOES A DSCOPY INTRINSIC REQUEST 
36 C 

37 OPT=0 

38 FNUM=0 
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39 CALL DSCOPY(OPT, STRING1, IRESULT) 

40 IF (IRESULT .GT. 0) CALL DSCOPYMSG(IRESULT, FNUM) 
41 STOP 

42 END 


DSCOPY BASIC Example 


10 
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REM THIS WILL DO A SIMPLE DSCOPY REQUEST 
DIM A$[{30],R[4] 

0=R2=Z=0 

MAT R=ZER 

A$=""NFTTESTS TO TEMP1,HDS “ 

PRINT A$ 

CALL BDSCOPY(0,A$,R[*] ) 

IF R[1] <>0 THEN PRINT “ ERROR IN DSCOPY. ERROR= "SR[1] 
IF R[1] <>0 THEN CALL BDSCOPYMSG(R[#] ,Z,R2) 
STOP 

END 


SECTION 


DSN/DS is particularly useful in applications that involve transaction processing and that are 
geographically or functionally dispersed. Any local-system command can be executed remotely 
through a simple extension to that command. Many operating system intrinsics are also extended in a 
similar fashion. No knowledge of the communication protocol or physical link being used is required 
of the terminal user or application programmer. Every application-level capability operates 
transparently across each connection-level alternative. . 


DS APPLICATION DESIGN 





DSN/DS on the HP 3000 provides facilities for point-to-point connection between processors. These 
connections can be made on a variety of types of communications lines, including switched (dial-up), 
leased, or hardwired, and they can also be mixed throughout the network. Applications can easily 
obtain access to systems more than one "hop" away, through multiple :REMOTE HELLO log-ons. In 
addition, HP 3000 computers can connect to X.25 packet-switched networks and communicate across 
those networks with HP 1000 or other HP 3000 computers using the DSN/X.25 software. In fact, . 
DSN/DS can maintain concurrent connections to multiple remote systems, and/or multiple 
connections to the same remote system, over a single physical link to the X.25 network. 


DSN/DS requires users to pass all of the security checks imposed by MPE (such as passwords) when 
logging on to a remote system. DSN/DS also provides additional security features applicable only toa 
network environment. For example, the operator can restrict incoming or outgoing access to the 
communications link. And incoming host-to-host calls from an X.25 network are accepted only if the 
remote host is configured in the local system’s network data base. 


DSN/DS offers the tools to facilitate the sharing of resources within a network. Examples of such 
resources are programs, data structures, or physical hardware elements of the network. You can access 
these resources in any of several modes: 


e Remote command execution allows you to direct commands to any CPU in the network. 


e Remote File Access (RFA) permits the application of processing power to files and devices remote 
from the CPU. RFA also provides the means for extending Interprocess Communications (IPC) 
across a DS link. 


® Program-to-program (PTOP) communication permits direct communications between master and 
slave programs, each resident in its own CPU within the network. 


e Remote Data Base Access (RDBA) gives the capability for direct and indirect access of data bases 
on any HP 3000 computer in the network. Combining the distributed processing capability of 
DSN/DS with the use of data management subsystems such as VPLUS/ 3000, KSAM/3000, and 
IMAGE/ 3000 makes possible the sharing of data. 


e Network File Transfer (NFT) is a more efficient mechanism than FCOPY for transferring disc 
files across a communications link. 


The chief advantages of Program-to-Program (PTOP) communication are coprocessing capabilities and 
control of data transmission blocking. Coprocessing master-slave programs execute in multiple 
systems. Program-to-Program communication allows decisionmaking to be distributed within the 
master-slave relationship. The exchange of data and control information between the executing 
programs can be used to alter program flow to adjust to current conditions in the network. 
Coprocessing capabilities assume importance in networks where synchronization of modifications to 
related data structures is important. 
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Blocking control can be utilized in such a manner as to decrease the number of transmissions to move 
a specific amount of data. Since transmission time on a high-speed link is a negligible factor in 
communications performance, the required number of transmissions is the key to performance. 
Reducing the number of transmissions correspondingly reduces the number of line turnarounds. This 
may become a significant performance factor in half-duplex networks or satellite communication 
links where propagation delay affects response time. 


TRANSMISSIONS BETWEEN SYSTEMS 


Underlying all modes of utilizing DSN/DS is the transmission of data from one system to another. 
Now compare the building of these transmission units for remote file access and for PTOP. 


DSN/DS is supported on three controllers: the Intelligent Network Processor (INP), the Hardwired 
Serial Interface (HSI), and the Synchronous Single-Line Controller (SSLC). To configure any of these 
devices into the system, you must specify a buffer length. The buffer length value that you specify 
represents the maximum number of words to be transmitted between systems in one transmission and 
it is the system’s default buffer size. When you activate DSN/DS with a :DSLINE command, a 
Linebuf parameter may be specified to override the configured buffer size. Only the first user to 
activate the line may use Linebuf to alter the data communication buffer size. This buffer size may 
not be respecified until all concurrent DSN/DS users have closed their links. In this way, the 
pertinent buffer limiting factors for inter-CPU transmissions are set. 


How is Linebuf utilized in accessing remote files and remote peripheral devices? The basic unit for 
file system operations is the record (or block of records). In remote file access and remote command 
execution, file system blocking limits the transmission unit to a single record or sequential multiple 
records. File system’s FREAD is satisfied by moving a logical record from a file to the user’s buffer. 
An FREAD on a file open with multi-record access is satisfied by a byte count that can be specified to 
be block-sized. Thus, an FREAD on a remote file will pack linebuf with a record or a specified byte 
count of sequential records. . 


Contrast this record-orientation to the array-orientation of PTOP communications. PTOP’s PREAD is 
satisfied by the transmission between programs of the contents of a user-defined buffer. The PTOP 
programmer must construct the buffer by packing it with array(s), record(s), or fields of records. The 
records in one transmission need not even come from the same file. 


In addition to transmitting specified data, DSN/DS attaches a header of varying lengths. The header 
always contains eight words transmitted in a fixed format and can contain additional words in an 
appendage area. For remote command execution and remote file and peripheral device access, the 
data field is usually preceded by a header of 14 words. Some intrinsics, such as FREAD (multirecord), 
require a longer header to convey all parameter information. The header for PTOP communications 
includes the 20-word tag field in the appendage; thus the typical PTOP header is 34 words long. The 
ideal Zinebuf size will allow the user’s data field plus DSN/DS header information to fit into 
Linebuf. 


To illustrate: Assume that you want to read six 80-byte records from a remote file and have specifed a 
Linebuf of 304 words. 


a. If the remote file is defined as REC=-80,1 »F, then Remote File Access must retrieve a block of 


one record from the disc, FREAD one record, and transmit one record. The complete data transfer 
requires six disc accesses, six FREADs, and six data transmissions. 
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b. If the remote file is defined as REC=-80,6,F, then Remote File Access must access the disc to 
retrieve a block of six records, satisfy an FREAD with one record, and transmit one record. The 
complete transfer requires one disc access, six FREADs, and six data transmissions. 


c. If the remote file is defined asREC=-80,6,F, and opened with the NOBUF and multirecord option, 
then Remote File Access must access the disc to retrieve a block of six records, satisfy an FREAD 
of 480 bytes with six records, and transmit the six records. The complete data transfer requires 
one disc access, one FREAD, and one data transmission. 


d. In PTOP, the master program can issue a PREAD. The slave program can pack the buffer with all 
six records, utilizing any of the above three methods. Note that a Linebuf of 304 words is 
ample to permit transmission of 480 bytes (240 words) of data plus 34 words of DSN/DS header 
information in one transmission. 


COORDINATING MASTER AND SLAVE PROGRAMS 


PTOP communication programming requires synchronizing two separate programs at specific points in 
time. For this reason, it is often helpful to block diagram the transmissions and their contents on a 
simulated time line. 


Where the PTOP programmer wants to loop on certain PTOP operations, the loop’s terminating 
condition must, of course, be defined. The master program has direct control over the interprogram 
communications and can terminate a loop under conditions defined locally. More difficult are the 
situations when the slave must communicate to the master that the terminating condition has been 
met. To do this, the slave might send a REJECT response. A REJ ECT does not allow transmission of 
data, and so requires a terminating exchange of transmissions after all data has been transmitted. 


Another method is to utilize the 20-word itag field (the itag parameter) of the PTOP intrinsics. 
This field is not accessible by the slave unless designated as a parameter in the corresponding master’s 
PTOP operation. For example: 


Master Program Slave Program 
Example A. PREAD(dsnum, target, teount); GET (itag); 
Example B. PREAD(dsnum, target, teount, itag); GET(itag); 


In example A, PREAD does not utilize the itag field. The slave program cannot access ttag on this 
transaction. The second PREAD (Example B) might not even initialize the itag array, but the array 
has been specified as a parameter. The slave program can now return control information to the 
master via this field. The master program logic can inspect itag and take corresponding action. 


A PCONTROL from the master will also cause an exchange of itag fields and may be used for passing 
control information. This intrinsic will not pass a data field, however. 


The control information passed between programs may terminate a loop, may branch to another part 


of the program, may transmit an index to be used in a CASE statement, or may serve any other purpose 
the programmer desires. 
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It is important to bear in mind the accessibility of transmitted data. When the master program 
PWRITEs, the slave program cannot process the received data until the ACCEPT intrinsic has moved the 
data into the slave process stack. The slave program can, however, examine the i tag array before 
doing the ACCEPT or REJECT. After examining the itag, the slave can then alter the itag array. 
The ACCEPT or REJECT will transmit the slave’s itag to the master. Slave local processing can then 
proceed. 


INTERPROCESS COMMUNICATION AND PTOP 


Interprocess Communication (IPC) is a capability of the MPE file system that is very beneficial in the 
DSN/DS environment. For some applications, IPC may be easier to implement than 
Program-to-Program Communications (PTOP) and may provide other advantages as well. A basic 
description of the use of IPC and the changes made to the file system is included in the MPE 
Intrinsics Reference Manual and the MPE File System Reference Manual. 


Message Files 


Message files are used by IPC to transfer requests from one process to another. Each message file isa 
queue, with records acted upon in the order received. Message files are opened with FOPEN, read with 
FREAD, written to with FWRITE, and closed with FCLOSE. 


When a message file is opened, the file system assigns a unique 16-bit ID number to the process that 
opens the file. Each record the process writes to the message file is associated with this number. 
When the writer closes the file, the ID number no longer applies, and may be reused. 


When the files are opened with FOPEN, the user process accesses the file as either a reader or a writer; 
readers access the top of the message file, while writers access the tail. Readers access the file with 
FREAD. The record is copied to the reader, and is deleted from the message queue. Writers access the 
file with FWRITE. FWRITE appends one record to the tail of a message file. See Figure 8-1. 
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FREAD to 
read process 


message 1 


FWRITE from write process 


message 5 


Figure 8-1. Reading and Writing to a Message File. 






Message files can be created using the : BUILD command or the FOPEN intrinsic. 


Example 


A simple example of the use of IPC for communication between two remote sessions is presented in 
Figure 8-2. User Bill establishes a local session on Node A and a remote session on Node B. His 
application, called BILLPROG, opens a local MSGFILE as a reader and a remote MSGFILE as a writer. 
Then, user Jack establishes a local session on Node B and a remote session on Node A. Jack’s 
application, called JACKPROG, opens a local MSGFILE as a reader and a remote MSGFILE as a writer. 
Now these two unrelated processes can communicate with each other through the IPC capability. 
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BILLPROG MSGFILE 


\ FREAD 


MSGFILE << JACKPROG 





Figure 8-2. Two-node IPC Communication 


If PTOP had been used in the example in Figure 8- 2,a PTOP master program would need to be 
executing in one node and a slave program would have been initiated by the master in the other node. 
The master-slave programs would also require coordination because of their relationship. 


The advantage of IPC becomes more dramatic when two or more processes desire to communicate with 
each other, or when the network is more complex than two nodes. Figure 8-3 shows a network 
consisting of three nodes and a solution that seems very useful in the general DSN/DS apeseeen 
environment. 
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Figure 8-3. Three-node IPC Communication 
In Figure 8-3, a general application program called a Message Switching Procedure (MSP) is written 
and executed on each node. The MSP performs the following functions: 
e Opens a local message file as a reader 
e Opens any local applications message files as a writer 
e Opens all DS lines to adjacent nodes 
e Establishes a remote session on each of these nodes 


e Opens a message file on each adjacent node as a writer to be used for communication with each 
adjacent MSP. 


The MSP handles all outgoing requests by forwarding them to the MSP programs on adjacent nodes. 


The MSP also handles all incoming requests by routing them to a local application program or by 
passing them on to the next node in the network. 
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If the network is complex and it is desirable to shift the responsibility for routing from the user to the 
MSP, a solution might include addressing within the user’s data buffer and the use of a directory file 
in conjunction with the MSP. The MSP would then use the directory file to determine to what node 
it should forward the message. A more advanced directory file could provide alternate routes in case 
of downed lines. If alternate routes were not available, the unserviceable requests could be stored in a 
disc file and then be rewritten to the MSP’s MSGFILE when the downed lines are restored. 


In a simple network, it may not be desirable to design an MSP; but it is still possible that using IPC 
may be more advantageous than using PTOP. In this case, each user application could set up one or 
more remote sessions on the appropriate node(s) and communicate with other processes using the 
normal file intrinsics (FOPEN, FREAD, FWRITE, and FCLOSE) and message files. Also, by using the 
:FILE command, it can be transparent to the user or to the application program that the MSGFILE is 
located on a remote node. 


The advantage of using an MSP is that several users on a system can communicate with a number of 
remote processes, but only one remote session is required per node. Since fewer remote sessions are 
necessary, the amount of memory required is decreased. 


The major advantage of IPC versus PTOP is that there is no limitation to the number of local or 
remote processes with which a single process can communicate. The processes are fully bilateral with 
IPC making it easier to implement and expand the application for more complex networks. Also, 
activities such as development, testing, and debugging can all be done on one node, and then the 
resulting application can be distributed. 


DEBUGGING 


Where the amount of local processing in a PTOP application is significant, it may be helpful to debug 
the master and slave programs as local programs. MOVEs on dummy arrays or FREADs on dummy files 
can be substituted for communication operations to simplify debugging of the local processing. 


When the time arrives to run the programs in master-slave fashion, a :RUN PROG; DEBUG is sufficient 
to invoke the Debug Utility for the master. This will not, however, allow the programmer to set a 
break-point in the slave program or to examine the slave process stack. To facilitate debugging a 
Slave program, the first executable statement of the slave program should be the DEBUG intrinsic. 


LINE BUFFERS/CONTINUATION BUFFERS 


DSN/DS is designed to send across the line, in a single transfer operation, the amount of data 
configured as the PREFERRED BUFFER SIZE for the line controller (INP, SSLC, or HSI). The first 
person to use a DS line can override the configured line buffer size by specifying a different value 
with the Linebuf parameter of a :DSLINE command. 


When a user specifies Linebuf=xxxx, the xxxx value tells the Communication Subsystem (CS/3000) 
the maximum amount of data DSN/DS will ever send across the line in a single request. For example, 
if you say Linebuf=1074, you are saying the largest buffer DSN/DS can pass to the Communication 
Subsystem is 1074 words. 
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The 1074 words will always consist of both user data and DSN/DS fixed header and variable-length 
appendage characters. These additional characters (approximately 20 to 50 words) give to and from 
information, intrinsic names, etc., and vary for RFA and PTOP operations. 


When a DSN/DS user requests the transfer of more data in a single operation than the line buffer can 
accomodate, DSN/DS automatically fills the line buffer, CS/3000 makes the transfer, then DSN/DS 
refills it, and transfers again -- until all of the user’s data has been sent. When a user’s single request 
causes DSN/DS to make several transfer operations, the additional buffers of data are known as 
“continuation buffers." As stated before, the ideal line buffer should be large enough to eliminate the 
need for continuation buffers. 
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Compression of data on the communications link may be specified in order to achieve higher 
throughput. DSN/DS initialization procedures allow compression only if both systems are capable of 
performing compression. Compression is handled on an individual basis, so that on a non-exclusive 
line, some users will compress while others will not. 


Compression is most helpful in applications using line speeds up to 56 K bps. It is generally neither 
helpful nor desirable in applications that use higher data rates. It can be specified by the user in three 
different ways: 


e At generation time by use of SUBTYPE=1 while configuring IODSO or IODSX (refer to Section 1 
in the DSN/DS HP 3000 to HP 3000 Network Administrator Manual). This configured subtype 
sets the default for the line. 


e While executing the :DSCONTROL console command. A console operator uses the parameter to 
override the configured line default or to reset to the configured state. 


e While executing a :DSLINE command ina session or job. Use of the :DSLINE parameter allows 
individual users to control whether or not their data will be compressed, and will override the 
current line default. 


Compression generally increases throughput by reducing redundancy in the data, which results in a 
reduction in the number of characters being transmitted over the communications link. The 
compression technique compresses any occurance of three or more consecutive characters. The 
compression takes place in the data only, not in the fixed part or the appendage of the DSN/DS 
header. 


The amount of redundancy in data or files may vary significantly. Source or listing files may be 
compressed by as much as 75 percent, but a more typical random assortment of HP 3000 files may be 
reduced by an amount closer to 25 percent. Obviously, the actual reduction will vary from 
application to application. Comparative tests with and without compression will indicate the benefits. 


In some cases, however, compression could actually result in an increase in the number of characters to 
be transmitted. For this reason, DSN/DS examines each case when compression is specified. If a 
situation is found where compression would be detrimental to performance, DSN/DS sends the data 
uncompressed. 


Using compression and decompression increases the system overhead at both ends of the link. The 
decision on whether to use compression depends on the communications link data rate, system load, 
and the amount of redundancy in the data being transmitted. Often, a test of relative throughput 
with normal system load and "typical" data will provide an indication of the benefits of using 
compression. 
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Formats for Inserted Compression Characters 


Octal Value Meaning 
XX nnn nnn XX = compression type 
00 = uncompressed character string 
10 = repeated blanks 
11 = repeated non-blank characters 
(next byte is the ASCII value for the repeated character) 


nnn nnn = octal character count 


1 to 77. 
Examples: 
036 36 (octal) non-compressed characters 
ods | 17 (octal) blank characters | 
323.052 23 (octal) compressed * characters 


For example, sending the string 1111111111 uncompressed resulted in the following string: 
031.061 031.061 031.061 031.061 031.061 

Sending the string compressed resulted in the following string: 
312.061 


where the 3 shows that there is a repeated non-blank character, the 12 means 12 octal (10 decimal) 
characters, and the 061 is the ASCII representation of 1. os 


PERFORMANCE 


The performance achieved while using the DSN/DS link may vary widely, and it depends on many 
factors. 


Computer System Dependent 

The activity mix on the respective HP 3000 will affect performance. It depends upon the character 
of the simultaneous activity: such as the number of jobs, number of CPU-bound jobs and their relative 
priority, contention for disc, memory size and amount of swapping, quantum size, etc. 
Communication Links 

The choice of the communications link will provide an upper limit to the perf ormance. Generally, a 
full-duplex line will outperform a half-duplex line by reducing line turnaround delays. A 


half-duplex line with a smaller request-to-send/clear-to-send delay will be faster (such as a 208B at 
50 milliseconds versus a 208B at 150 milliseconds). 
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Line quality can result in wide variations in performance at times when line errors are high. A leased 
line is generally better and more predictable than a dial-up line. Some telephone offices s Provide 
cleaner lines depending on the age and nature of their switching gear. 


Applications 


For a given amount of data, the buffer size selected will affect performance. The smaller the number 
of requests required to transmit a given quantity of data, the higher the throughput. This also 
includes continuation requests. The data may be packed into larger buffers while using PTOP 
applications. The data may also be blocked into larger records for RFA applications. (RFA and 
FCOPY handle one record at a time, even though the file may use blocking). 


As described earlier, use an appropriate line buffer size. Use a line buffer large enough to contain the 
full record or buffer, plus the DSN/DS fixed blocks and appendage header words. (The 
"rule-of-thumb" is 50 words larger than the data size. ) 


For applications to be run on dial-up lines, the line errors normally suggest a reasonable Linebu f 
maximum of 1024 words. Analysis of :SHOWCOM xx ;ERRORS output and trace listings for error 
rates will allow modification of this recommendation fer "typical" conditions. (This suggested 
maximum value of 1024 could be either increased or decreased when an SSLC is being used; but the 
value could only be decreased when the communications interface is an INP, since the maximum 
buffer size for the INP is 1024 words.) 


PTOP applications allow both the master and slave programs to doa larger share of data searching, 
qualification, and manipulation at each local computer, thus reducing the quantity of data which 
must be sent across the line. 


Remote Listing 


Where data must be sent to a remote device (such as a line printer or a magnetic tape) it may be 
possible to send the program that generates the data to the remote computer for execution. For 
example, since a compiler listing can be quite large, it might be more efficient to transmit the source 
across the line and do a remote compilation and remote list, rather than doing a remote list for a local 
compilation. 


DS Applications 
MULTIPLE REMOTE ACCESS 


While presenting the basic concepts of DSN/DS in the tutorial sections of this manual, the examples 
were intentionally limited to simple networks. From those somewhat simplistic illustrations, it might 
appear as though the only way your local computer can talk to more than one other computer is 
through additional parallel communication lines from your local system to the additional remote 
systems. Actually, it is possible to communicate with other remote computers in the network that 
have no direct connection with your local computer. This communication is made possible by going 
through one remote computer (to which you do have a direct communication line) to reach another 
remote computer to which the first remote computer is connected. To reach a second remote system 
through a first remote system, a multiple REMOTE command is used. The syntax is as follows: 


sREMOTE [xxx] [REMOTE [xxx]] ... [command] 


In this way, the local user can initiate a session sequentially on each remote system. See Figure 8-4. 


SYSTEM SYSTEM SYSTEM SYSTEM 
A B C D 


‘REMOTE LISTF............. Lists these 





files to 
System A 
"REMOTE REMOTE LISTF.......................-5. Lists these 
files to 
System A 
‘REMOTE REMOTE REMOTE LISTF...............-.... 20sec eee eee Lists these 
files to 
System A 


Figure 8-4. Multiple Remote Accessing Example 


Figure 8-4 shows how your local system (System A) can obtain a list of the files in the first remote 
system (System B) by issuing the command: 


:REMOTE LISTF 


To obtain a similar list of files from System C in this kind of network (where the communications link 
is through an intermediate remote computer), use the command: 
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:REMOTE REMOTE LISTF 
Likewise, you can route your request through to System D by expanding the command to: 
:REMOTE REMOTE REMOTE LISTF 


Using this compound command accomplishes the same result as if you had issued the following series 
of separate commands: 


> REMOTE 
#REMOTE 
#REMOTE 
#LISTF 


There is an important difference in the way of returning to your local system, however. When you 
reach System D (Figure 8-4) by entering the compound command 


>REMOTE REMOTE REMOTE 
# 


the # prompt is coming from the Command Interpreter (CI) on System D. If you now type a colon (:) 


#: 


you are being switched back to your local CI (System A). But if you were to use the alternative 
method of reaching System D with a series of separate commands 


: REMOTE 
#REMOTE 
#REMOTE 
# 


and then you typed a colon as before, you would be switched to System C. To get back to your local 
system (System A), you must return a step at a time (just as you went out to System Da step at a time) 
as follows: 


> REMOTE 
#REMOTE 
#REMOTE 





SECTION 


Before establishing a DSN/DS communications link, the console : DSCONTROL command must be used 
to OPEN a line, so that it is available to DSN/DS users. The :DSCONTROL command allows you to 
enable or disable the DSN/DS subsystem on a specific communications link. 


DSCONTROL CONSOLE COMMAND 





For easy reference, this command is shown in the following format: 


e SYNTAX Shows the format of the command. 

e PARAMETERS Describes the variables in the command. 
e OPERATION Describes the command in detail. 

e EXAMPLES Shows the command in use. 


> ae 


:DSCONTROL 


SYNTAX 


:DSCONTROL dsdevice [;function [;... function]] 





where the parameter function has the following options: 


[;CANCEL] 


OPEN [,MASTER : 
: SHUT Be |» [SPEED=] speed | 


: TRACE [oH BALL fimask] (amoréries) [EWRAP] [Bf Z@ncm | 


>] 


; COMP 
; NOCOMP 


count 


| 
| 
Some a | 
| 
| 


SRETRY=( ent | 
: = 


PARAMETERS 

dsdevice The logical device number or the device class name of the 
DSN/DS communications device (IODSO or IODSX). On your 
system’s I/O configuration listing, the device is back referenced by 
a pound sign (#) to a previously defined INP, HSI, or SSLC. 
(Required parameter.) 

OPEN For bisync DSN/DS (IODS0), the DS subsystem is enabled but no 


activity is initiated on the communications link. For DS/X.25 
(IODSX), the DS subsystem establishes a communications link with 
the PDN. Makes the line available for remote communication via 
the DSN/DS Subsystem. (Required parameter.) 


9=2 


CANCEL 


SHUT 


MASTER 


SLAVE 


Linespeed 


:DSCONTROL 


the PDN. Makes the line available for remote communication via 
the DSN/DS Subsystem. (Required parameter.) 


Applicable only to X.21. Cancels all queued outgoing call 
requests. Sends an abort request to the communications device. 
Validates that the device is X.21 related and that there is a 
queued request. CANCEL is executed before any other 

: DSCONTROL parameter. 


Initiates an orderly line shutdown. Refer to OPERATION for 


details about the line closing procedure. 


Limits DSN/DS line activity to outgoing requests only. No 
incoming sessions are allowed. 


Limits DSN/DS line activity to incoming requests only; no 
outgoing activity is allowed. 
Default: Both MASTER and SLAVE processing are allowed. 
Transmission rate in characters per second (Bit Rate/8). This 
parameter is effective only if your system generation for the line 
selected SPEED CHANGEABLE. Specify Linespeed if yours isa 
European installation with modems running at half speed, or if 
the line is hardwired and you want to override the configured 
default. It may be necessary to include this parameter if the 
length of cables used for HSI communications has been changed 
since the system was configured. 
HSI speed: 250 000 (cable lengths less than 1000 ft.) 

125 000 (cable lengths greater than 1000 ft.) 
INP or SSLC speed: 250, 300, 600, or 1200 
INP only speed: 2400 or 7200 
The SPEED= keyword in the open option may be omitted from a 
: DSCONTROL command. For example, the following two 
commands have exactly the same effect: 
:DSCONTROL 60;OPEN,MASTER,SPEED=250000 
:DSCONTROL 60;OPEN ,MASTER, 250000 


Remember, both ends of the line must operate at the same speed. 


Default: System configuration values. 
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TRACE , ON 


ALL 


mask 


numentries 


Activates the TRACE facility to provide a record of 
communications activities. Trace parameters are positional. The 
line must already be open, or the OPEN keyword must also be 
included (to open the line). 


Generates trace records for all line activity. 

Default: Records are written only for transmission errors. 

An octal number preceded by a percent sign (%nn). Used to select 
type of trace entries generated. Refer to Sections 3 and 4 in the 
DSN/DS 3000 Network Administrator's Manual for an 
explanation of the mask bits. 

Default: %37 (all except PSTN). 

Decimal integer for the maximum number of entries in a trace 
record, not greater than 248. 


Default: 24. (See OPERATION. ) 


NOTE 


When using DSN/X. 25, there is not enough space left on 
the INP to trace using the default number of entries, 24. 
The user must specify numentries = 16. 


WRAP 


filename 


TRACE , OF F 


COMP 


Trace entries that overflow the trace record overlay the prior 
trace record entries. 


Default: Overflow entries are discarded. 
A name for the trace file. 
Default: DSTRCxxx.PUB.SYS (where xxx is the LDEV of the 


dsdevice). 


Deactivates the TRACE facility, so that no records are kept of 
DSN/DS actions, states, and events. Also closes the trace file. 


Sets data compression as the default mode of operation for all line 
users. The line need not be open to use COMP. 
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NOCOMP 


MON »DS 
CS 


MOFF 

call DEFAULT 
count 

OPERATION 


| 


:DSCONTROL 


Sets uncompressed data as the default mode of operation for all 
line users. The line need not be open to use NOCOMP. 


Activates internal communication monitoring activity to give 
additional information on a subsequent cold dump of the system. 
The line must be open for the use of MON. 


MON Requests monitoring of all levels of activity. 


MON ,DS Requests monitoring at the DSN/DS level of 
internal software operation. 


MON ,CS Requests monitoring at the Communication System 
level of internal software operation. 


Default: No monitoring. 
Used only for system troubleshooting. 


Deactivates internal DSN/DS monitor records. Line must be open 
for the use of MOFF. 


Changes the communications error retry count to the specified 
value. The retry counter controls the number of times the system 
attempts to send or receive a message across the communications 
link. 


DEFAULT Specifies a limit of 15 retries after a line error 
occurs. 

count Can be any value within the range of 0 to 255. 

Default: 15. 


Unless : DSCONTROL is issued from the master console, this command requires the user to have CS and 
ND capability. In addition, all users except the console operator are granted access to : DSCONTROL 
only if they are ALLOWed to use the command and are ASSOCIATEd with the specified DS device. 


Only one DSN/DS communications device can be active (OPEN) on a controller at any given time. 
Once opened (with the : DSCONTROL command), a communications link can be shared by multiple 
DSN/DS users. It cannot, however, be shared by users of other communications subsystems supported 
by your system (for example, DSN/MRJE). Thus, you must SHUT the DSN/DS communications device 
before the controller can be opened for use by another subsystem. 
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Before issuing a : DSCONTROL command, use the :SHOWDEV command to check whether a 
communications link is already established. The LDEV for the INP, SSLC, or HSI port will be 
UNAVAI Lable if the communications link is in use by any subsystem; the LDEV for a DSN/DS 
communication device, driver IODSO or IODSX, will be AVAILable if it is currently OPEN for use by 
DSN/DS users. 


If a DS device class includes more than one DS device, the functions specified in the : DSCONTROL 
command apply to all devices in that class. If you have not been ALLOWed to use this command, you 
can only control those devices in the device class with which you have been ASSOCIATEd (if any). 


If you include more than one function in a :DSCONTROL command, each function (with its 
subparameter list) must be separated by a semicolon. A function that duplicates or conflicts with a 
previous function overrides that function. Functions can appear in any order but are executed in the 
following order: 


1. CANCEL 

2. OPEN/SHUT 

3. TRACE 

4. MON/MOFF 

5. COMP/NOCOMP 

The default name of the trace file is: 

DSTRCxxx. PUB.SYS 

where xxx is the logical device number of the dsdevice. 


If no trace file exists when you turn on the trace facility and you do not specify numentries, the 
system creates a file to hold 24 entries in each record. If you are using DSN/X.25, however, you must 
specify numentries =16, because there is not enough space on the INP for 24. 


When using the bisync protocol, the SHUT parameter initiates an orderly line closing procedure. If no 
sessions or applications are using the line when you shut it, line disconnection occurs immediately. If 
any user (including applications) has the line open, the line remains connected until all sessions and 
applications CLOSE the line, or until those accessing the line terminate or are aborted. Once CLOSEd 
by the console operator, no new users may access the line until the operator reopens it. When using 
the X.25 capability of DSN/DS, the SHUT parameter disconnects the line immediately, even if there 


are current users on the line. 
NOTE 


Occasionally you may not be able to SHUT a standard 
(non-X. 25) DS line. This could happen, for example, if a 
DS user forgot to issue a :DSLINE xxx;CLOSE | 
command but still has a local session. It could also 
happen if a remote session is "hung." In such a situation, 
you can "kill" all activity across the line by issuing an 
:ABORTIO xxx (where xxx is the logical device number 
of the dsdevice). Following the use of the :ABORTIO 


9-6 


:DSCONTROL 


xxx command, a second :DSCONTROL xxx 3; SHUT 
command will complete successfully. 


EXAMPLES 


To open X.25 line number 55, thereby making it available for use by DSN/DS users, enter: 
:DSCONTROL 55;OPEN 

To permit the local HP 3000 to process only master (outgoing) requests on DS line number 55, enter: 
sDSCONTROL 55;OPEN,MASTER 

To activate the CS Trace facility for DS line 55 (the line is already open), enter: 

:DSCONTROL 55;TRACE,ON,ALL 

To open X. 25 line 55 and activate CS Trace with a maximum of 250 entries in a trace record, enter: 
:DSCONTROL 55;OPEN;TRACE,ON,,,250 


To open the line named REMSYS and establish compression as a default and enable internal monitoring, 
enter: 


sDSCONTROL REMSYS;OPEN;COMP;MON 


atl 


SECTION 


Ec 


DSLIST AND DSTEST 





DSLIST 


The DSLIST program provides a list of the software module version numbers for the DSN/DS, 
DSN/X. 25, and CS modules installed on your system. This list must be available for all 
troubleshooting activities, and it must accompany each Service Request (SR) that you submit to your 
HP Systems Engineer (SE). 


In order to obtain the list, you must have READ access to the DSN/DS program files in PUB.SYS. 
The command syntax is: 


:RUN DSLIST.PUB.SYS 


Version Report Examples 


DSN/DS WITH DSN/X. 25 


:RUN DSLIST.PUB.SYS 
HEWLETT PACKARD 30131A.00.00 DSLIST/3000 WED, APR 7,1982, 1:18 PM 


DSN/DS HP32189A: 


MODULE VERSION 
SL DSSEGS A.00.00, INTERNAL FIX 000 
SL DSRTECALL A.00.00, INTERNAL FIX 000 
DSMON A.00.00, INTERNAL FIX 000 
DSTEST A.00.00, INTERNAL FIX 000 
DS2026 A.00.00, INTERNAL FIX 000 
DS2026CN A.00.00, INTERNAL FIX 000 
DSCOPY A.00.00, INTERNAL FIX 000 
IODSO A.00.00, INTERNAL FIX 000 
TODSTRMO A.00.00, INTERNAL FIX 000 
IODSTRMX A.00.00, INTERNAL FIX 000 
DSN/X.25 HP32191A: 
MODULE VERSION 
DSMONX A.00.00, INTERNAL FIX 000 
IODSX A.00.00, INTERNAL FIX 000 
IOPADO A.00.00, INTERNAL FIX 000 
CS SUBSYSTEM HP30131 
MODULE VERSION 
SL COMSYS A.05.09, INTERNAL FIX 000 
SL DSIOM A.00.00, INTERNAL FIX 000 
DSDUMP A.00.00, INTERNAL FIX 000 
NETCONF A.05.09, INTERNAL FIX 000 
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END OF PROGRAM 


DSN/DS WITHOUT DSN /X. 


:RUN DSLIST.PUB.SYS 
HEWLETT PACKARD 30131A. 


DSN/DS HP32189A: 


MODULE VERSION 
SL DSSEGS A.00.00, 
SL DSRTECALL -00.00, 
DSMON -00.00, 
DSTEST .00.00, 


A 

A 

A 
DS2026 A.00.00, 
DS2026CN A.00.00, 
DSCOPY A.00.00, 
IODSO A.00.00, 
IODSTRMO =A.00.00, 
IODSTRMX A.00.00, 


DSN/X.25 HP32191A: 
NOT INSTALLED 


CS SUBSYSTEM HP30131 


MODULE VERSION 
SL COMSYS A.05.09, 
SL DSIOM A.00.00, 
DSDUMP A.00.00, 


NETCONF A.05.09, 


END OF PROGRAM 


25 


00.00 DSLIST/3000 WED, APR 7,1982, 1:18 PM 


INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 


INTERNAL 
INTERNAL 
INTERNAL 
INTERNAL 


FIX 
FIX 
FIX 
FIX 
FIX 
FIX 
FIX 
FIX 
FIX 
FIX 


FIX 
FIX 
FIX 
FIX 


000 
000 
000 
000 
000 
000 
000 
000 
000 
000 


000 
000 
000 
000 
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DSTEST 


DSTEST checks your DS line by transmitting and receiving data. You can specify how many times to 
check your line, and other parameters, by running DSTEST in Diagnostic Mode. Or, you can simply 
run DSTEST, and it will use default values. Before running DSTEST, you must have opened the DS 
line using the :DSLINE command, and established a remote session. 


Normal Mode 

Normal mode is often run by users when problems are suspected. When calling for HP Support, the 
results of running Normal Mode should be included. 

To run the normal mode, perform the following steps: 

1. Enter the following line to initiate DSTEST: 


:RUN DSTEST.PUB.SYS 


In the normal mode, you are not required to select options; the default values are automatically 
used. 


2. Answer the following question: 
:DSLINE? 


Enter the device class or logical device number for IODSO, or node name for an X.25 
configuration. 


NOTE _ 


The normal mode default is a 512-word 


program-to-program transfer with all words containing 
4177777. 


DSLIST and DSTEST 
Diagnostic Mode 


To run the diagnostic mode, perform the following steps: 

1. If you are testing RFA, a : FILE command is required before initiating DSTEST to direct the data 
to the desired file to and DS line. (This file does not have to exist.) The file equation is: 
:FILE REMOTE ;DEV=dsdevice#DISC 
Enter the following line to initiate the line test: 

:RUN DSTEST.PUB.SYS,DIAG 
2. Answer the following questions: 
-RFA or PTOP? 
Enter RFA for Remote File Access or enter PTOP for Program-to-Program testing. 
~REMOTE COMPUTER? (This question is only asked for RFA.) 
Enter 3000 or 1000. 
.DSLINE? (This question is not asked for RFA if Step 1 was followed. ) 


Enter the device class or logical device number for IODSO, or node name for an X.25 
configuration. 


~-NUMBER OF PASSES? 
Enter the number of actual transmissions desired, up to a maximum of 32767 (decimal). Entering 
0 or causes the test pattern to be transmitted once. A pass is one transmit and one receive 
transaction pair. 


» PATTERN? 


Enter an octal word to be transferred (the % sign must be entered). 


NOTE | 


Illegal input causes the message 
INPUT ERROR 
to be printed. Enter a correct value, or enter to 
specify the default value 4177777. 
. BLOCKSIZE? 


Enter the desired blocksize of the transfer (<4096). If a value equal to or greater than 4096 is 
entered, an error message will be printed. 
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CONTINUE (Y/N)? 


Enter Y to return to the beginning of the option selection phase if you wish to repeat the cycle, or 
enter N to terminate the test. 
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DSTEST,CONFIG 


DSTEST has an alternate entry point, CONFIG, that provides a list of the DS devices configured 
through SYSDUMP. The program also provides a rudimentary check of the configuration, looking for 
obvious errors. It does not recognize the PAD terminal drivers IOPADO or IOPAD1. 

DSTEST ,CONF IG is especially useful for picking out the DS devices from a large configuration. 


A sample run of DSTEST ,CONFIG follows. 


:RUN DSTEST.PUB.SYS,CONFIG 
LDEV DEVICE DEVICE TYPE LINK SUBTYP MODE WIDTH DRIVER 


13 CS INP 0 IOINPO 
15 CS INP 0 IOINPO 
16 CS INP 0 IOINPO 
17 cS INP 0 IOINPO 
18 cS INP 0 IOINPO 
19 cS INP 0 IOINPO 
120 DS CONTROLLER 17 128 IODSO 


121 DS PSEUDOTERM 120 
122 DS PSEUDOTERM 120 
123 DS PSEUDOTERM 120 
124 DS PSEUDOTERM 120 
125 DS PSEUDOTERM 120 
126 DS PSEUDOTERM 120 
127 DS PSEUDOTERM 120 
128 DS PSEUDOTERM 120 
129 DS PSEUDOTERM 120 
140 DS CONTROLLER 15 
141 DS PSEUDOTERM 140 
142 DS PSEUDOTERM 140 
143 DS PSEUDOTERM 140 
144 DS PSEUDOTERM 140 
145 DS PSEUDOTERM 140 
146 DS PSEUDOTERM 140 
147 DS PSEUDOTERM 140 
148 DS PSEUDOTERM 140 
149 DS PSEUDOTERM 140 
150 DS CONTROLLER 16 
151 DS PSEUDOTERM 150 
152 DS PSEUDOTERM 150 
153 DS PSEUDOTERM 150 
154 DS PSEUDOTERM 150 
155 DS PSEUDOTERM 150 
156 DS PSEUDOTERM 150 
157 DS PSEUDOTERM 150 
158 DS PSEUDOTERM 150 
159 DS PSEUDOTERM 150 
160 DS CONTROLLER 18 
161 DS PSEUDOTERM 160 
162 DS PSEUDOTERM 160 
163 DS PSEUDOTERM 160 
164 DS PSEUDOTERM 160 


ID 40 IODSTRMO 
ID 40 IODSTRMO 
ID 40 IODSTRMO 
ID 40 IODSTRMO 
IODSTRMO 
ID 40 ITODSTRMO 
ID 40 IODSTRMO 
ID 40 ITODSTRMO 
ID 40 IODSTRMO 
128 IODSX 
ID 40 TODSTRMX 
ID 40 TODSTRMX 
ID 40 TODSTRMX 
ID 40 ITODSTRMX 
IODSTRMX 
ID 40 IODSTRMX 
ID 40 TODSTRMX 
ID 40 TODSTRMX 
ID 40 IODSTRMX 
128 TODSO 
ID 40 ITODSTRMO 
ID 40 IODSTRMO 
ID 40 ITODSTRMO 
ID 40 TODSTRMO 
IODSTRMO 
ID 40 IODSTRMO 
ID 40 ITODSTRMO 
ID 40 ITODSTRMO 
ID 40 ITODSTRMO 
128 IODSO 
ID 40 IODSTRMO 
ID 40 IODSTRMO 
TODSTRMO 
ID 40 TODSTRMO 


Aaa anagauaa nq aAaananaanaaca 
Hi H 
Oo oO 
pS os 
oO oO 


[Poo C OC COCO OOOO oOoO OOO OOOO OOO OOO OOO OO OW WW Ww Ww Ww 
YA aanaagagnang 
Ht 
1) 
Bay 
oO 


Cry a 
eH 
Oo 
db 
oS 
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165 DS 
166 DS 
167 DS 
168 DS 
171 DS 
172 DS 
173 DS 
174 DS 
175 DS 
176 DS 
177 DS 
178 DS 
179 DS 
180 DS 
181 DS 
182 DS 
183 DS 


END OF PROGRAM 


PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
CONTROLLER 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
CONTROLLER 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 
PSEUDOTERM 


160 
160 
160 
160 

19 
171 
171 
171 

13 
175 
175 
175 
175 
175 
175 
175 
175 


onmnoomooowoaomwmoo0o0ncoecco0de9. 


Ce Cy Cy Ga 


C4 Cy Cy 


Ca Cy Ce Cy Ce Cy Ca Gs 


40 
40 
40 


128 
40 


40 
128 


40 
40 
40 


40 
40 
40 


IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSO 

IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSO 

IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSTRMO 
IODSTRMO 


DSLIST and DSTEST 


If the person configuring the system had answered any of the SYSDUMP questions incorrectly, an 
error message (such as LDEV nnn: Device mode may be erroneous .) would be printed. 
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ERROR CODES AND MESSAGES 





>i 


The following is a summary of the error code numbers and messages that may be encountered. The 
messages, as listed here, have been grouped into several categories. For example, the first group 
contains all messages pertaining to :DSLINE syntax problems, while the second group contains the 
messages that report a DSN/DS functional problem. Each group is identified with an explanatory 
heading, and the messages are listed in numerical sequence within each category for easy reference. 


-:DSLINE SYNTAX ERRORS 


These messages are sent to the terminal user to point out an error in syntax or to warn of the 
consequences of a request. 

4300 REMOTE JOBS ARE NOT ALLOWED !. (CIERR 1300) 

1301 DSLINE CANNOT CONTAIN BOTH OPEN AND CLOSE. (CIERR 1301) 

1302 DSLINE REQUIRES AT LEAST ONE PARAMETER. (CIERR 1302) 


1303 DSNUMBER SPECIFICATION MUST BE A NUMBER FROM 1 THRU 255. 
(CIERR 1303) 


1304 DSLINE #1! DOES NOT IDENTIFY AN OPEN DS LINE. (CIERR 1304) 


1305 EXPECTED LINEBUF, PHNUM, IOCID, REMID, OPEN, CLOSE, 
QUIET, COMP, NOCOMP, OR EXCLUSIVE. (CIERR 1305) 


1306 MULTIPLE USE OF ! IS NOT ALLOWED. (CIERR 1306) 


1307 THE SYNTAX FOR ! REQUIRES AN = SIGN FOLLOWED BY DATA. 
(CIERR 1307) 


1308 PHNUM IS 1 TO 20 DIGITS AND DASHES. (CIERR 1308) 
1309 ! LIST CAN CONTAIN ONLY ONE ELEMENT. (CIERR 1309) 
1310 THE SPECIFIED LOGICAL DEVICE IS NOT OPEN. (CIERR 1310) 


1311 THE FIRST CHARACTER OF AN ID SEQUENCE MUST BE A " OR A ( 
(CIERR 1311) 


1312 THE ID SEQUENCE MUST TERMINATE WITH A ). (CIERR 1312) 
1313 THE ID SEQUENCE MUST TERMINATE WITH A“. (CIERR 1313) 


1314 A NUMERIC ID SEQUENCE ELEMENT MUST BE 1 THRU 255 (OR 
%377). (CIERR 1314) 


Error Codes and Messages 


1315 


. 1316 


1317 


1318 


1319 


1320 


1321 


1322 


1323 


1324 


1325 


1326 


1389 


LINEBUF MUST BE A NUMERIC VALUE FROM 304 THRU 4096. 
(CIERR 1315) 


UNABLE TO COMPLETE THE REMOTE COMMAND. (CIERR 1316) 
NOT A CURRENTLY AVAILABLE DSLINE. (CIERR 1317) 


USE OF EXCLUSIVE REQUIRES BOTH NS AND CS CAPABILITY. 
(CIERR 1318) 


THE DS LINE #L! IS IN USE BY A PROGRAM OR SUBSYSTEM AND 
CANNOT BE CLOSED. (CIERR 1319) 


EXPECTED A RESPONSE OF YES, Y, NO, OR N. (CIERR 1320) 
UNABLE TO OPEN THE DS LINE ON DEVICE t. (CIERR 1321) 
@ IS INVALID IN THIS CONTEXT. (CIERR 1322) 


A DSLINE OPEN REQUIRES A VALID DS DEVICE NAME AS THE 
FIRST PARAMETER. (CIERR 1323) 


FROM ADDRESS MUST BE BETWEEN 1 AND 14 CHARACTERS INCLUSIVE. 
(CIERR 1324) 


TO ADDRESS MUST BE BETWEEN 1 AND 14 CHARACTERS INCLUSIVE. 
(CIERR 1325) 


FROM AND TO ADDRESS MUST BE A DECIMAL NUMBER. (CIERR 1326) 


INVALID OR MISSING DELIMETER FOR SELECTION SIGNAL SEQUENCE. 


(CIERR 1389) 


1390 


SELECTION SIGNAL SEQUENCE MUST BE FROM 1 TO 30 CHARACTERS. 


(CIERR 1390) 


1391 


1392 


1393 


1394 


1395 


1396 


1397 


BOTH QUEUE AND NOQUEUE SPECIFIED; NOQUEUE USED. (CIWARN 1391) 


ONLY ! WORDS WERE ALLOCATED FOR THE LINE BUFFER. 
(CIWARN 1392) 


COMPRESSION REQUEST NOT HONORED. REMOTE DOES NOT SUPPORT 
THIS FEATURE. (CIWARN 1393) 


COMPRESSION PARAMETER RESPECIFIES AND OVERRIDES PREVIOUS 
COMPRESSION PARAMETER. (CIWARN 1394) 


OPEN PARAMETERS ENTERED ON A CLOSE REQUEST ARE IGNORED 
(CIERR 1395) 


AN ID LIST MUST CONTAIN 255 OR LESS ELEMENTS. 
(CIWARN 1396) 


AN UNNECESSARY DELIMITER IS IGNORED. (CIWARN 1397) 
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1398 THERE ARE NO DS LINES OPEN. (CIWARN 1398) 


1399 MULTIPLE USE OF ! IS REDUNDANT AND IGNORED. (CIWARN 1399) 


DSN/DS FUNCTIONAL ERRORS 


These messages report a functional problem within the system. 


201 


202 


203 


204 


205 


206 


207 


208 


209 


210 


211 


212 


213 


214 


215 


REMOTE DID NOT RESPOND WITH THE CORRECT REMOTE ID. 
(DSERR 201) 


SPECIFIED PHONE NUMBER IS INVALID. (DSERR 202) 
REMOTE ABORT/RESUME NOT VALID WHEN DOING PROGRAM-TO- 
PROGRAM COMMUNICATION. USE LOCAL ABORT/RESUME. 
(DSWARN 203) 


UNABLE TO ALLOCATE AN EXTRA DATA SEGMENT FOR DS/3000. 
(DSERR 204) 


UNABLE TO EXPAND THE DS/3000 EXTRA DATA SEGMENT. 
(DSERR 205) 


SLAVE PTOP FUNCTION ISSUED FROM A MASTER PROGRAM. 
(DSERR 206) 


SLAVE PTOP FUNCTION OUT OF SEQUENCE. (DSERR 207) 


MASTER PTOP FUNCTION ISSUED BY A SLAVE PROGRAM. 
(DSERR 208) 


SLAVE PROGRAM DOES NOT EXIST OR IS NOT PROGRAM FILE. 
(DSERR 209) 


WARNING -- INVALID MAXDATA OR DLSIZE FOR A SLAVE PROGRAM. 
SYSTEM DEFAULTS ARE IN EFFECT. (DSWARN 210) 


SLAVE ISSUED A REJECT TO A MASTER PTOP OPERATION. 
(DSWARN 211) 


FILE NUMBER FROM IOWAIT NOT A DS LINE NUMBER. (DSWARN 212) 


EXCLUSIVE USE OF A DS LINE REQUIRES BOTH ND AND CS 
CAPABILITY. (DSERR 213) 


THE REQUESTED DS LINE HAS NOT BEEN OPEN WITH A USER :DSLINE 
COMMAND OR A REQUIRED :REMOTE HELLO HAS NOT BEEN DONE. 
(DSERR 214) 


DSLINE CANNOT BE ISSUED BACK TO THE MASTER COMPUTER. 
(DSERR 215) 
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216 


217 


218 


219 


220 


221 


222 


223 


224 


225 


226 


2e7 


228 


231 


232 


233 


234 


235 


236 


237 


238 


239 


240 


MESSAGE REJECTED BY THE REMOTE COMPUTER. (DSERR 216) 
INSUFFICIENT AMOUNT OF USER STACK AVAILABLE. (DSERR 217) 
INVALID PTOP FUNCTION REQUESTED. (DSERR 218) 


MULTIPLE POPEN. ONLY ONE MASTER PTOP OPERATION CAN BE 
ACTIVE ON A DS LINE. (DSERR 219) 


PROGRAM EXECUTING GET WAS NOT CREATED BY POPEN. (DSERR 220) 
INVALID DS MESSAGE FORMAT. INTERNAL DS ERROR. (DSERR 221) 
MASTER PTOP FUNCTION ISSUED PRIOR TO A POPEN. (DSERR 222) 


REQUEST TO SEND MORE DATA THAN SPECIFIED IN POPEN. 
(DSERR 223) 


FILE EQUATIONS FOR A REMOTE FILE CONSTITUTE A LOOP. 
(DSERR 224) 


CANNOT ISSUE POPEN TO A SLAVE SESSION IN BREAK MODE. 
(DSERR 225) 


SLAVE PROGRAM HAS TERMINATED BEFORE EXECUTING "GET". 
(DSERR 226) 


REMOTE HELLO MUST BE DONE TO INITIATE REMOTE SESSION. 
(DSERR 227) 


EXCEEDED MAXIMUM NUMBER OF VIRTUAL CHANNELS PER JOB. 
(DSERR 228) 


INVALID FACILITY IN CONNECTION REQUEST. (DSERR 231) 

THE REMOTE COMPUTER IS NOT OBTAINABLE. (DSERR 232) 

VIRTUAL CIRCUIT IS NOT AVAILABLE. (DSERR 233) 

QUEUEING IS REQUIRED TO COMPLETE THE REQUEST. (DSERR 234) 
DS MESSAGE SEQUENCING ERROR. (DSERR 235) 

COMMUNICATIONS HARDWARE HAS DETECTED AN ERROR. (DSERR 236) 
CANNOT CURRENTLY GAIN ACCESS TO THE TRACE FILE. (DSERR 237) 


COMMUNICATIONS INTERFACE ERROR. INTERNAL FAILURE. 
(DSERR 238) 


COMMUNICATIONS INTERFACE ERROR. TRACE MALFUNCTION. 
(DSERR 239) 


LOCAL COMMUNICATION LINE WAS NOT OPENED BY OPERATOR. 
(DSERR 240) 
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241 


242 


243 


244 


245 


246 


247 


248 


249 


250 


251 


252 


253 


254 


255 


256 


Error Codes and Messages 
DS LINE IN USE EXCLUSIVELY OR BY ANOTHER SUBSYSTEM. 
(DSERR 241) 
INTERNAL DS SOFTWARE ERROR ENCOUNTERED. (DSERR 242) 
REMOTE OR PDN IS NOT RESPONDING. (DSERR 243) 


COMMUNICATIONS INTERFACE ERROR. LINE RESET OCCURRED. 
(DSERR 244) 


COMMUNICATIONS INTERFACE ERROR. RECEIVE TIMEOUT. 
(DSERR 245) 


COMMUNICATIONS INTERFACE ERROR. REMOTE DISCONNECTED. 
(DSERR 246) 


COMMUNICATIONS INTERFACE ERROR. LOCAL TIME OUT. (DSERR 247) 


COMMUNICATIONS INTERFACE ERROR. CONNECT TIME OUT. 
(DSERR 248) 


COMMUNICATIONS INTERFACE ERROR. REMOTE REJECTED 
CONNECTION. (DSERR 249) 


COMMUNICATIONS INTERFACE ERROR. CARRIER LOST. (DSERR 250) 


COMMUNICATIONS INTERFACE ERROR. LOCAL DATA SET FOR THE 
DS LINE WENT NOT READY. (DSERR 251) 


COMMUNICATIONS INTERFACE ERROR. HARDWARE FAILURE. 
(DSERR 252) 


COMMUNICATIONS INTERFACE ERROR. NEGATIVE RESPONSE TO THE 
DIAL REQUEST BY THE OPERATOR. (DSERR 253) 


COMMUNICATIONS INTERFACE ERROR. INVALID 1/O CONFIGURATION. 
(DSERR 254) 


COMMUNICATIONS INTERFACE ERROR. UNANTICIPATED CONDITION. 
(DSERR 255) 


REQUEST QUEUED BEHIND PREVIOUS REQUEST. 


-DSCONTROL INFORMATORY MESSAGES 


These messages convey status information. 


300 


301 


DS DEVICE t: MASTER AND SLAVE ACCESS SHUT. 


DS DEVICE !: SLAVE ACCESS OPENED; MASTER ACCESS SHUT. 
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302 


303 


304 


305 


306 


307 


308 


309 


310 


311 


312 


313 


314 


DS 


DS 


DS 


DS 


DS 


DS 


DS 


DS 


DS 


DS 


DS 


DS 


DS 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


DEVICE 


! 


: MASTER ACCESS OPENED; SLAVE ACCESS SHUT. 
: MASTER AND SLAVE ACCESS OPENED. 

: TRACE ACTIVATED USING TRACE FILE !. 

: TRACE DEACTIVATED. 

: MONITORING ACTIVATED. 

: MONITORING DEACTIVATED. 

: DEBUG MODE ACTIVATED. 

: DEBUG MODE DEACTIVATED. 


: SPECIAL DEBUG MODE ACTIVATED. 


DEFAULT MODE IS NO COMPRESSION. 


: DEFAULT MODE IS COMPRESSION. 


RETRY COUNT NOW EQUALS °. 


: CALL REQUEST CANCELED. 


:DSCONTROL ERROR MESSAGES 


These messages point out an error in syntax or warn of the consequences of a request. 


4100 NUMBER OF PARAMETERS EXCEEDS MAXIMUM OF ?¢. (CIERR 4100) 


4101 EXPECTED AT LEAST TWO PARAMETERS: A DS DEVICE 
CLASS/NUMBER AND A FUNCTION KEYWORD. (CIERR 4101) 


4102 


4103 


4104 


4105 


4106 


EXPECTED A DEVICE CLASS NAME OR LOGICAL DEVICE NUMBER FOR 
ONE OR MORE DS DEVICES. (CIERR 4102) 


USER IS NOT ASSOCIATED WITH DS DEVICE !. NO CONTROL 
FUNCTIONS EXECUTED FOR THIS DEVICE. (CIWARN 4103) 


USER IS NOT ALLOWED TO USE :DSCONTROL AND IS NOT ASSOCIATED 
WITH THE DS DEVICE(S). (CIERR 4104) 


EXPECTED ONE OR MORE OF THE CONTROL FUNCTIONS: OPEN, SHUT, 
MON, MOFF, COMP, NOCOMP, TRACE, OR DEBUG. (CIERR 4105) 


INVALID CONTROL FUNCTION. EXPECTED ONE OF: OPEN, SHUT, 
MON, MOFF, COMP, NOCOMP, TRACE, OR DEBUG. (CIERR 4106) 


4107 


4108 


4109 


4110 


4111 


4112 


4113 


4114 


4115 


4116 


4117 


4118 


4119 


4120 


4121 


4122 


4123 


4124 


4125 


4126 


4127 


4128 


4129 


Error Codes and Messages 
MASTER OVERRIDES PREVIOUS MASTER/SLAVE OPTION. 
(CIWARN 4107) 


SLAVE OVERRIDES PREVIOUS MASTER/SLAVE OPTION. 
(CIWARN 4108) 


SPEED OPTION OVERRIDES PREVIOUS SPEED OPTION. 
(CIWARN 4109) 


OPEN OVERRIDES PREVIOUS OPEN/SHUT FUNCTION. (CIWARN 4110) 
SHUT OVERRIDES PREVIOUS OPEN/SHUT FUNCTION. (CIWARN 4111) 
TRACE OVERRIDES PREVIOUS TRACE FUNCTION(S). (CIWARN 4112) 
DEBUG OVERRIDES PREVIOUS DEBUG FUNCTION(S). (CIWARN 4113) 
MON OVERRIDES PREVIOUS MON/MOFF FUNCTION. (CIWARN 4114) 
MOFF OVERRIDES PREVIOUS MON/MOFF FUNCTION. (CIWARN 4115) 
COMP OVERRIDES PREVIOUS COMP/NOCOMP FUNCTION. (CIWARN 4116) 


NOCOMP OVERRIDES PREVIOUS COMP/NOCOMP FUNCTION. 
(CIWARN 4117) 


EXPECTED A "3" , ","., OR RETURN AS DELIMITER, (CIERR 4118) 
EXPECTED EITHER A "3" OR RETURN AS DELIMITER. (CIERR 4119) 
EXPECTED A "=" AS DELIMITER FOR SPEED OPTION. (CIERR 4120) 
EXPECTED A "," AS DELIMITER BETWEEN OPTIONS. (CIERR 4121) 


ILLEGAL OPEN/SHUT OPTION. EXPECTED ONE OF: MASTER, SLAVE, 
SPEED, OR LINESPEED VALUE. (CIERR 4122) 


EXPECTED A POSITIVE DOUBLE VALUE FOR LINESPEED. 
(CIERR 4123) 


CS CAPABILITY REQUIRED TO USE :DSCONTROL. (CIERR 4124) 
PM CAPABILITY REQUIRED TO USE DEBUG FUNCTION. (CIERR 4125) 


DEBUG FUNCTION MAY ONLY BE USED BY SYSTEM CONSOLE. 
(CIERR 4126) 


EXPECTED NO OPTION FOR DEBUG OR ONE OF THE FOLLOWING: 
ON, OFF, OR POSITIVE INTEGER VALUE. (CIERR 4127) 


EXPECTED NO OPTION FOR MON/MOFF OR ONE OF THE FOLLOWING: 
CS OR DS. (CIERR 4128) 


COMP/NOCOMP FUNCTIONS HAVE NO OPTIONS. (CIERR 4129) 
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4130 


4131 


4132 


4133 


4134 


4135 


4136 


4137 


4138 


4139 


4140 


4141 


4142 


4143 


4144 


4145 


4146 


4147 


4148 


4149 


4150 


4151 


4152 


SPEED OPTION IGNORED FOR SHUT FUNCTION. (CIWARN 4130) 


EXTRANEOUS ";" IGNORED. POSSIBLE MISSING FUNCTION? 
(CIWARN 4131) 


EXTRANEOUS "," IGNORED. POSSIBLE MISSING OPTION? 
(CIWARN 4132) 


CREATION OF DS MONITOR PROCESS FAILED. (CIERR 4133) 
PROGRAM FILE "DSMON.PUB.SYS" MISSING. (CIERR 4134) 

DS MONITOR UNABLE TO RUN AS A SYSTEM PROCESS. (CIERR 4135) 
CS DEVICE ! IS UNAVAILABLE FOR USE. (CIERR 4136) 

DS DEVICE MUST BE OPEN PRIOR TO USE. (CIERR 4137) 


USER SPECIFIED TRACE FILE NOT ALLOWED WHEN MORE THAN ONE 
DEVICE IN DEVICE CLASS. (CIERR 4138) 


DS DEVICE ! CURRENTLY CONTROLLED ELSEWHERE. (CIWARN 4139) 


DS DEVICE !: OPEN/SHUT NOT EXECUTED DUE TO ABOVE. 
(CIWARN 4140) 


DS DEVICE !: TRACE NOT EXECUTED DUE TO ABOVE. (CIWARN 4141) 


DS DEVICE !: MON/MOFF NOT EXECUTED DUE TO ABOVE. 
(CIWARN 4142) 


DS DEVICE !: COMP/NOCOMP NOT EXECUTED DUE TO ABOVE. 
(CIWARN 4143) 


DS DEVICE !: DEBUG NOT EXECUTED DUE TO ABOVE. (CIWARN 4144) 
NO DS DEVICES REMAINING TO BE CONTROLLED. (CIWARN 4145) 
RETRY OVERRIDES PREVIOUS RETRY FUNCTION. (CIWARN 4146) 


EXPECTED AN "=" AS DELIMITER FOR RETRY FUNCTION. 
(CIERR 4147) 


INVALID RETRY COUNT, MUST SPECIFY "DEFAULT" OR A NUMBER 
BETWEEN O AND 255 INCLUSIVE. (CIERR 4148) 


DS DEVICE !: RETRY NOT EXECUTED DUE TO ABOVE. (CIWARN 4149) 
DS INTERNAL FIX NUMBERS DIFFER. (CIWARN 4150) 


INCOMPATIBLE OR MISSING NONCRITICAL DS MODULE: DSCOPY , 
DSTEST, DS2026, OR DS2026CN. (CIWARN 4151) 


CRITICAL DS MODULES ARE INCOMPATIBLE, NO CONTROL FUNCTIONS 
EXECUTED. (CIERR 4152) 


A-8 


4153 


4155 
4180 
4181 
4182 


4183 


‘DS 


0 


1 


19 
roa 
24 


25 


Error Codes and Messages 
MISSING CRITICAL DS SOFTWARE, NO CONTROL FUNCTIONS EXECUTED. 
(CIERR 4153) 
PROMPT OVERRIDES PREVIOUS PROMPT FUNCTION(S). (CIERR 4155) 
REDUNDANT SPECIFICATION OF CANCEL OPTION IGNORED. (CIWARN 4180) 
CANCEL OPTION HAS NO PARAMETERS. (CIERR 4181) 
DS DEVICE t IS NOT AN X.21 DEVICE; CANCEL NOT EXECUTED. (CIWARN 4182) 


NO CALL REQUEST FOR DS DEVICE !. (CIWARN 4183) 


COPY GENERAL ERROR MESSAGES 


SUCCEEDED. 

SUCCESSFULLY INITIATED. 

UNABLE TO OPEN TRANSACTION FILE. (NFTERR 4) 

UNABLE TO OPEN LIST FILE (DSCOPYI). (NFTERR 5) 

IC ERROR ON TRANSACTION FILE. (NFTERR 6) 
TRANSACTION RECORD > 200 CHARS LONG. (NFTERR 7) 
TEMPORARY TRANSACTION FILE FULL. (NFTERR 9) 
PARAMETERS IMPLY CONFLICTING MODES. (NFTERR 10) 
CAN’T "RUN" COPY PROCESS IN THIS MODE. (NFTERR 11) 
UNRECOGNIZED PARAMETER. (NFTERR 13) 

CONFLICTING OPTIONS HAVE BEEN SPECIFIED. (NFTERR 14) 
UNIMPLEMENTED FEATURE. (NFTERR 16) 

CANNOT CONTACT REMOTE NODE. (NFTERR 17) 

FILE SYSTEM ERROR ON SOURCE FILE. (NFTERR 18) 

FILE SYSTEM ERROR ON TARGET FILE. (NFTERR 19) 
ILLEGAL DSLINE NAME. (NFTERR 21) 

UNSUPPORTED STANDARD DEVICE TYPE. (NFTERR 24) 


CAN’T FIND OR OPEN THE SOURCE FILE. (NFTERR 25) 
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26 


27 


28 


29 


30 


33 


36 


37 


38 


39 


40 


41 


42 


CAN’T CREATE OR OPEN THE TARGET FILE. (NFTERR 26) 
CANNOT CONTACT REMOTE SYSTEM. (NFTERR 27) 


SOURCE AND TARGET FILES CANNOT BE ACCESSED THROUGH REMOTE 
FILE ACCESS. (NFTERR 28) 


COMMUNICATION IO ERROR. (NFTERR 29) 

INSUFFICIENT CAPABILITIES. (NFTERR 30) 

NO SOURCE FILE WAS SPECIFIED. (NFTERR 33) 

DS/3000 HAS NOT BEEN INSTALLED ON THIS SYSTEM. (NFTERR 36) 
REMOTE SYSTEM UNABLE TO USE TRANSPARENT MODE. (NFTERR 37) 


CAN’T FIND THE EXTRA DATA SEGMENT, USE THE DSCOPY INTRINSIC 
TO INVOKE NFT. (NFTERR 38) 


INVALID EXTRA DATA SEGMENT CONTENTS, USE THE DSCOPY INTRINSIC 
TO INVOKE NFT. (NFTERR 39) 


NEGOTIATIONS FAILED, NO COPY CAN BE PERFORMED. (NFTERR 40) 
FILE TRANSFER ABORTED. (NFTERR 41) 


COPY CANCELLED BY USER. (NFTERR 42) 


:DSCOPY INTRINSIC ERROR RETURNS 


80 


81 


82 


83 


84 


85 


86 


BOUNDS VIOLATION. (NFTERR 80) 
SPLITSTACK MODE CALLS NOT ALLOWED. (NFTERR 81) 
FIRST PARAMETER VALUE IS OUT OF RANGE (-1:6). (NFTERR 82) 


SECOND PARAMETER TOO SHORT TO CONTAIN VERSION STRING. 
(NFTERR 83) 


NFT PROCESS IS BUSY, CAN’T START NEW TRANSACTION. 
(NFTERR 84) 


NFT PROCESS IS NOT RUNNING. (NFTERR 85) 


ILLEGAL BASIC CALLING SEQUENCE. (NFTERR 86) 


Error Codes and Messages - 


-DSCOPY INTERNAL ERRORS 


101 


102 


103 


104 


105 


106 


107 


108 


109 


110 


INTERNAL ERROR ON REMOTE SYSTEM. (NFTERR 101) 

REMOTE SYSTEM NFT VERSION IS INCOMPATIBLE. (NFTERR 102) 
INTERNAL - STRING STORAGE OVERFLOW. (NFTERR 103) 

UNABLE TO CREATE TEMPORARY TRANSACTION FILE. (NFTERR 104) 
AN UNEXPECTED MESSAGE WAS RECEIVED. (NFTERR 105) 

AN ILLEGAL VALUE WAS RECEIVED IN A MESSAGE. (NFTERR 106) 
A MESSAGE RECEIVED IN INVALID FORMAT. (NFTERR 107) 


A REQUIRED ELEMENT WAS MISSING FROM A RECEIVED MESSAGE. 
(NFTERR 108) 


NFT PROCESS CREATE FAILED. (NFTERR 109) 


ATTEMPT TO GET EXTRA DATA SEGMENT FAILED. (NFTERR 110) 


X.21 MESSAGES 


Set 1: Call Progress Signals 


1} 


2% 


a4 


20! 


ei! 


eet 


23! 


4i! 


42! 


43! 


44! 


45! 


LDEV */CPS 001 TERMINAL CALLED 

LDEV !/CPS 002 REDIRECTED CALL 

LDEV !/CPS 003 CONNECT WHEN FREE 

LDEV t/CPS 020 NO CONNECTION 

LDEV !/CPS 021 NUMBER BUSY 

LDEV !/CPS 022 SELECTION SIGNALS PROCEDURE ERROR 
LDEV !/CPS 023 SELECTION SIGNAL TRANSMISSION ERROR 
LDEV !/CPS 041 ACCESS BARRED 

LDEV !/CPS 042 CHANGED NUMBER 

LDEV t/CPS 043 NOT OBTAINABLE 

LDEV !/CPS 044 OUT OF ORDER 


LDEV t/CPS 045 CONTROLLED NOT READY 
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46! LDEV !/CPS 


47! 


48! 


49! 


6i! 


Ti! 


Bit 


82! 


83! 


LDEV 


LDEV 


LDEV 


LDEV 


LDEV 


LDEV 


LDEV 


LDEV 


t/CPS 
!/CPS 
1/CPS 
1/CPS 
!/CPS 
1/CPS 
'/CPS 


1/CPS 


046 


047 


048 


049 


061 


O71 


081 


082 


083 


UNCONTROLLED NOT READY 

DCE POWER OFF 

INVALID FACILITY REQUEST 

NETWORK FAULT IN LOCAL LOOP 

NETWORK CONGESTION 

LONG TERM NETWORK CONGESTION 
REGISTRATION/CANCELLATION CONFIRMED 
REDIRECTION ACTIVATED 


REDIRECTION DEACTIVATED 


Set 2: DCE Provided Information 


1! 


2.4 


af 


10! 


20! 


LDEV 


LDEV 


LDEV 


LDEV 


LDEV 


1 /NPI 
1 /NPI 
!/NPI 
t /NPI 


!/NPI 


001 


002 


003 


010 


020 


CHARGE ADVICE - MONETARY CHARGES ! 
CHARGE ADVICE - DURATION (SECONDS) ! 
CHARGE ADVICE - UNITS ! 

LINE IDENTIFICATION ! 


SIGNAL FORMATTING ERROR ! 


APPENDIX 


DSN/DS COBOL INTERFACE 





CONVENTIONS 


To call an external procedure from ANS COBOL (COBOL/D, the parameters must be passed by word 
reference. This requirement effectively prevents the COBOL/I user from calling system-level 
intrinsics in general, and specifically, the DSN/DS Program-to-Program intrinsics. The following 
interface routines are provided to allow the ANS COBOL user access to the program~-to-program 
communications capability. The user of COBOL II/3000 need not use these interface intrinsics, since 
the call-by-value capability can access the Program-to-Program intrinsics (as outlined in the 
COBOL/II Reference Manual). 


The parameters in the COBOL calling sequences must be of the following types: — 


If the parameter is an integer, it must be a COBOL picture 9 through 9(4) or $9(3) computational, 
synchronized. 


If the parameter is a character string, it must be defined as COBOL picture X(n) or A(n), where rn is 
large enough for the required number of characters. 


In the following parameters, those not specifically defined as characters will be assumed to be integers. 
It is assumed that the user is already familiar with DSN/DS, in general, and the program-to-program 


intrinsics, specifically. Information regarding formal usage or content of the interface intrinsic 
parameters can be found in Section 6. 


COMMON PARAMETERS 


Parameters whose use is the same through all the procedures are: 


ecode integer (required) 
The condition code returned by the PTOP intrinsic. 
-1 =CCL 
0 = CCE 
1=CCG 


Refer to Section 6 for the meaning associated with these codes in individual PTOP 
calls. 


dsnum integer (required) 
The number returned by CPOPEN, and which is required for all subsequent master 
PTOP calls. The number is always 0 for slave programs. 


ttag A 20-word integer field (optional). 


target A character field used for reading or writing data (required). 
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teount 


integer (required). 
The number of words or bytes to be read or written. Words area positive integer; 
bytes are negative. 


INTERFACE INTRINSICS 


CPOPEN 


This procedure is the COBOL callable interface to POPEN. 


Calling Sequence: 


CALL "CPOPEN" USING ecode,dsnum, dsdevice, progname, itag, entryname, parm, 
flags, stacksize, dlsize, maxdata, buffsize 


Where: 


dsdevice 


progname 


itag 


entryname 


parm 


flags 
stacksize 
dlsize 
maxdata 


buf fsize 


is a character field containing the node name, device class, or logical device number 
of the desired DS line. 


is a character field containing the name (terminated by a space) of the remote slave 
program. 


is the 20-word integer field sent to and received from the remote program. 


is the character field specifying the secondary entry point (or spaces) where the 
remote program will begin execution. It is ignored if the slave program runs on an 
HP 1000. 


is an integer value to be placed in Q-4 of the slave program. It is ignored if the 
slave program runs on an HP 1000. 


are all MPE parameters used to specify slave program loading options. See Section 
6 of this manual or the MPE Intrinsics Reference Manual for usage. It is ignored 
if the slave system is an RTE system. 


is an integer specifying the maximum number of words which will be transferred 
by any of the PTOP intrinsics. 


DSN/DS COBOL Interface 


CPREAD 
This procedure is the COBOL callable interface to PREAD. 
Calling Sequence: 


CALL "CPREAD" USING ccode,dsnum,length,target ,tcount ,itag 


Where: 

Length is the actual number of words or bytes (depending on the value of teount) read 
into target. (Required.) 

CPWRITE 


This procedure is the COBOL callable interface to PWRITE. 
Calling Sequence: 


CALL "CPWRITE" USING ccode,dsnum,target ,teount ,itag 


CPCONTROL 
This procedure is the COBOL callable interface to PCONTROL. 
Calling Sequence: 


CALL "“CPCONTROL" USING ecode,dsnum,itag 


CPCLOSE 
This procedure is the COBOL callable interface to PCLOSE. 
Calling Sequence: 


CALL "CPCLOSE" USING ecode,dsnum 
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CGET 
This procedure is the COBOL callable interface to GET. 
Calling Sequence: 


CALL “CGET" USING ecode,ifun,itag,il ,ionumber 


Where: 
tfun is the function number of the current pending PTOP operation. (Required. ) 

O =Anerror occurred. This value is returned only when the condition code CCL 
is also returned. Issue a PCHECK intrinsic call (with a dsnum parameter of zero) 
to determine what happened. 

1 = POPEN request received. 

2 = PREAD request received. 

3 = PWRITE request received. 

4 = PCONTROL request received. 

5 = This value is returned only when the condition code CCG 
is also returned. It indicates that a pending MPE File System I/O without wait 
request was completed (instead of the expected remote DSN/DS I/O request). 
tonumber contains the file number associated with the completed I/O request. 

il is the number of words sent by a PWRITE or the number of words requested by a 

PREAD. 

tonumber is the file number of a non-DS file which completed an I/O without wait. 
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CACCEPT 
This procedure is the COBOL callable interface to ACCEPT. 
Calling Sequence: 


CALL "CACCEPT" USING ecode,itag, target ,tcount 


CREJECT 
This procedure is the COBOL callable interface to REJECT. 
Calling Sequence: 


CALL "CREJECT" USING ccode,itag 


CPCHECK 
This procedure is the COBOL callable interface to PCHECK. 
Calling Sequence: 


CALL "CPCHECK" USING ecode,dsnum,icode 


Where: 

dsnum integer (required for master, optional for slave). 
For a master program, this number is returned by the CPOPEN call. For a slave 
program, this number is always 0. 

tocode is an integer identifying the last error encountered. The error code meanings are 
given in Appendix A, under "DSN/DS Functional Errors." 

EXAMPLE 


The following example illustrates how two COBOL programs, residing on two HP 3000 computers, pass 
data back and forth. These two programs demonstrate and test the intrinsics available to the user of 
the COBOL Program-to-Program facility of DSN/DS. The Slave program must be entered on the 
remote system, compiled, and PREPed before the test. The PREPed file must then be made a 
permanent file. In this example, the MPE commands were: 


:COBOL COBOLSS (COBOL Slave Source) 
:PREP $OLDPASS, COBOLS 
:SAVE COBOLS 


The Master program must then be entered, compiled, PREPed, and run on the local system. 


A brief outline of the test follows: 
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1. The Master program opens the Slave program with CPOPEN. The itag array is filled with the 
value of the subscript of each array element, and the CPOPEN intrinsic is called. The Slave 
displays certain parameters involved in the opening. Then the Master also displays the value of 
the parameters used for opening the remote program. After each call is made to a COBOL 
intrinsic, the status of the call is checked in the STATUS-CK -RTN paragraph. 


2. The Master next tests the CPREAD intrinsic by requesting that a message from the Slave be sent 


back. 


3. CPWRITE is tested by sending a message to the Slave. The Slave then displays the message as it was 
received to demonstrate the validity of the text. 


4. The CREJECT-TEST paragraph of the Master is used to test the CPREJECT intrinsic available to 
the Slave as well as the CPCONTROL intrinsic of the Master. The value 14 is moved into the first 
element of ITAG and CPCONTROL is called. Within the paragraph that handles a call to 
CPCONTROL, the Slave tests this value and rejects the request. 


5. The master then calls CPCLOSE to close the remote program before terminating itself. 


The individual programs are shown on the following pages. 


Master PTOP Program 


OO1OOO$CONTROL USLINIT,SOURCE,MAP 
001100 IDENTIFICATION DIVISION. 


001200 PROGRAM-ID. MASTER-COBOL. 


001300 ENVIRONMENT DIVISION. 


001400 DATA DIVISION. 


OO 1 S00 2 #6 96 96 46 a6 96 9 9 3 HE HE HEH HEE HE HEHE HE HEHE HE HE HH EE HE 


VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 


0. 
oF 
0. 
33: 
IS 
IS 
IS 
IS 
0. 
0. 
[S32 
0 


=1. 
a 


304. 


SPACES. 


8000. 


“<< ACCEPT >>". 
"## PCHECK ##" 
“##HeRREEH MASTER HHHHEEREE 


## 


POPEN ##". 
PREAD ##". 
STATUS CHECK ##". 
PWRITE ##". 
PCONTROL ##". 


001600 WORKING-STORAGE SECTION. 
001700 77 CCODE PIC $99 COMP 
001800 77 DSNUM PIC S99 COMP 
001900 77 PARAM PIC $99 COMP 
002000 77 FLAGS PIC $99 COMP 
002100 77 STACKSIZE PIC $9(4) COMP 
002200 77 DLSIZE PIC S9(4) COMP 
002300 77 MAXDATA PIC $9999 COMP 
002400 77 BUFSIZE PIC S999 COMP 
002500 77 LGTH PIC S99 COMP 
002600 77 ICODE PIC $99 COMP 
002700 77 TCOUNT PIC $99 COMP 
002800 77 I PIC $99 COMP 
002900 77 DATA-BUF PIC X(66) 
OOZ0OOHHHHHHHHHHAH HHH HHHH HH HRH AHHH EE KKH ER HHEHE HES HEK 
003100 77 A-DOLLAR PIC X(12) VALUE 
003200 77 K-DOLLAR PIC X(12) VALUE 
003300 77 M-DOLLAR PIC X(26) VALUE 
003400 77 O-DOLLAR PIC X(11) VALUE 
003500 77 R-DOLLAR PIC X(11) VALUE 
003600 77 S-DOLLAR PIC X(18) VALUE 
003700 77 W-DOLLAR PIC X(12) VALUE 
003800 77 CO-DOLLAR PIC X(14) VALUE 
003900 77 C9-DOLLAR PIC X(12) VALUE 


PCLOSE ##'. 
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004000 77 D1-DOLLAR PIC XXXX VALUE "INDY". 

004100 77 EQ-DOLLAR PIC XX VALUE " ". 

004200 77 PO-DOLLAR PIC X(7) VALUE "COBOLS ". 
004300 77 RO-DOLLAR PIC X(12) VALUE "<< REJECT >>". 


O00 440 OH H 46 HH HE HEE HE HE HH HE HE HE HEH HEE HHH HH 


004500 01 ITAG-ARRAY. 


004600 


02 ITAG-ARRAY-MEM PIC 99 OCCURS 20 TIMES. 


00470 QRH HHH EHH HHH HHH HEHEHE HHH HEHEHE HH HH 


004800* 


PROCEDURE DIVISION * 


0.0 490 046 4 36 96-46 46 6 HE HE HEE HE HE He HE HE HEE HEHE HE HE HE HE aE HE HE HE HE HE HEH HR HEH 


005000 PROCEDURE DIVISION. 
005100 DRIVER-PARA. 


005200 
005300 
005400 
005500 
005600 
005700 
005800 
005900 
006000 
006100 
006200 
006300 
006400 
006500 
006600 
006700 
006800 
006900 
007000 
007100 
007200 
007300 
007400 
007500 
007600 
007700 
007800 
007900 
008000 
008100 
008200 
008300 
008400 
008500 
008600 
008700 
008800 
008900 
009000 
009100 
009200 
009300 


PERFORM ISSUE-AN-OPEN. 
PERFORM ISSUE-A-READ. 
PERFORM ISSUE-A-WRITE. 
GO TO CREJECT-TEST. 

GO TO PCLOSE-CALL. 


ISSUE-AN-OPEN. 


DISPLAY M-DOLLAR. 

DISPLAY O-DOLLAR. 

PERFORM LOOPI VARYING I FROM 1 BY 1 UNTIL 
I IS GREATER THAN 20. 

DISPLAY " TAG TO BE SENT: ". 

DISPLAY ITAG-ARRAY. 

CALL "CPOPEN" USING CCODE, DSNUM, D1-DOLLAR, PO-DOLLAR, 
ITAG-ARRAY, EO-DOLLAR, PARAM, FLAGS, STACKSIZE, DLSIZE, 
MAXDATA, BUFSIZE. 

PERFORM STATUS-CK-RTN. 

DISPLAY O-DOLLAR. 

DISPLAY " CCODE=", CCODE, " DSNUM=", DSNUM, 

" PARAM=", PARAM. 

DISPLAY " FLAGS=", FLAGS, " STACKSIZE=", STACKSIZE. 

DISPLAY " DLSIZE=", DLSIZE, "“ MAXDATA=", MAXDATA. 

DISPLAY " BUFSIZE=", BUFSIZE, " LGTH=", LGTH. 

DISPLAY " PROGNAME=", PO-DOLLAR. 

DISPLAY " ITAG-ARRAY RECEIVED: ". 

DISPLAY ITAG-ARRAY. 


ISSUE-A-PREAD. 


DISPLAY R-DOLLAR. 

PERFORM LOOPI VARYING I FROM 1 BY 1 UNTIL 

I IS GREATER THAN 20. 

DISPLAY "“ITAG TO BE SENT: ". 

DISPLAY ITAG-ARRAY. 

CALL "CPREAD" USING CCODE, DSNUM, LGTH, DATA-BUF, 
TCOUNT, ITAG-ARRAY. 

PERFORM STATUS-CK-RTN. 

DISPLAY " CCODE=", CCODE, " DSNUM=", DSNUM, 
" LGTH=", LGTH. 

DISPLAY " DATA RECEIVED FROM SLAVE: “. 

DISPLAY DATA-BUF. 

DISPLAY " ITAG RECEIVED: “. 

DISPLAY ITAG-ARRAY. 


ISSUE-A-WRITE. 


DISPLAY W-DOLLAR. 
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009400 
009500 
009600 
009700 
009800 
009900 
010000 
010100 
010200 
010300 
010400 
010500 
010600 
010700 
010800 
010900 
011000 
011100 
011200 
011300 
011400 
011500 
011600 
011700 
011800 
011900 
012000 
012100 
012200 
012300 
012400 
012500 
012600 
012700 
012800 
012900 
013000 
013100 
013200 
013300 
013400 
013500 
013600 


PERFORM MULTIPLY-LOOP VARYING I FROM 1 BY 1 UNTIL 
I IS GREATER THAN 20. 
DISPLAY "“ ITAG TO BE SENT: ". 
DISPLAY ITAG-ARRAY. 
MOVE "THIS IS THE DATA FROM PWRITE TEST." TO DATA-BUF. 
CALL "“CPWRITE" USING CCODE, DSNUM, DATA-BUF, TCOUNT, 
ITAG-ARRAY . 
PERFORM STATUS-CK-RTN. 
DISPLAY " CCODE=", CCODE, " DSNUM=", DSNUM. 
DISPLAY " ITAG RECEIVED: ". 
DISPLAY ITAG-ARRAY. 
CREJECT-TEST. 
DISPLAY CO-DOLLAR. 
MOVE SPACES TO ITAG-ARRAY. 
MOVE 14 TO ITAG-ARRAY-MEM(1). 
DISPLAY "ITAG TO BE SENT: ". 
DISPLAY ITAG-ARRAY. 
CALL "“CPCONTROL" USING CCODE, DSNUM, ITAG-ARRAY. 
PERFORM STATUS-CK-RTN. 
STOP RUN. 
LOOPI. 
MOVE I TO ITAG-ARRAY-MEM(I). 
MULTIPLY-LOOP. 
MULTIPLY 2 BY ITAG-ARRAY-MEM(I). 
STATUS-CK~-RTN. 
IF CCODE IS LESS THAN ZERO GO TO 
SOMETHING-WENT-WRONG. 
IF CCODE IS GREATER THAN ZERO GO TO 
REQUEST-REJECTED. 
DISPLAY S-DOLLAR, "EVERYTHING OKAY". 
REQUEST-REJECTED. 
DISPLAY S-DOLLAR, “REQUEST REJECTED BY SLAVE". 
GO TO PCLOSE-CALL. 
SOMETHING-WENT-WRONG. 
DISPLAY S-DOLLAR, "“CCL--SOMETHING IS WRONG". 
CALL "CPCHECK" USING CCODE, DSNUM, ICODE. 
DISPLAY K-DOLLAR, " CCODE=", CCODE, 
“ ICODE=", ICODE. 
PCLOSE-CALL. 
DISPLAY C9-DOLLAR. 
CALL "“CPCLOSE" USING CCODE, DSNUM. 
DISPLAY " CCODE=", CCODE, " DSNUM=", DSNUM. 
STOP RUN. 
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Slave PTOP Program 


OO1O00$CONTROL USLINIT,SOURCE 
001100 IDENTIFICATION DIVISION. 
001200 PROGRAM-ID. SLAVE-COBOL. 
001300 ENVIRONMENT DIVISION. 
001400 DATA DIVISION. 


OO 1 500% #6 96 4 a6 a8 HE EE HE HE aE HE EH HEH HEHEHE HHH 


001600 WORKING-STORAGE SECTION. 


001700 77 T PIC S99 USAGE COMP. 

001800 77 I PIC $99 COMP VALUE 0. 
001900 77 CCODE PIC $99 COMP VALUE 0. 
002000 77 IFUN PIC $9 COMP VALUE O. 
002100 77 IL PIC $99 COMP VALUE 0. 
002200 77 IONUMBER PIC S99 COMP VALUE 0. 
002300 77 ICODE PIC $99 COMP VALUE O. 
002400 77 DSNUM PIC S99 COMP VALUE 0. 


DO 2S OOH H HH HH HE HE HE HE HE HE HE HE HE HE HE HE HE HH HE HEH HHH EEE HH HHH 


002600 77 C-DOLLAR PIC X(11) VALUE "## CHECK ##". 

002700 77 G-DOLLAR PIC X(9) VALUE "## GET ##". 

002800 77 A-DOLLAR PIC X(12) VALUE “## ACCEPT ##'. 

002800 77 R-DOLLAR PIC X(12) VALUE "“## REJECT ##". 

003000 77 S-DOLLAR PIC X(25) VALUE "######### SLAVE ee a 
C103 1 OOH a 5 46 46 9696 96 96 9 HE He HE HE HE EE EH EH HE HE HE HE HE HE EH HE EH 

003200 77 OO-DOLLAR PIC X(11) VALUE "<< POPEN >>". 

003300 77 CO-DOLLAR PIC X(14) VALUE "<< PCONTROL >", 
003400 77 SO-DOLLAR PIC X(18) VALUE “## STATUS CHECK ##". 
003500 77 RO-DOLLAR PIC X(11) VALUE "<< PREAD ae 

003600 77 WO-DOLLAR PIC X(12) VALUE "<< PWRITE >>". 

C037 00H #4 46 9696-96 HE HE HE HE aE HE EE EE HE HEH HE EH HE EH HE HE HEE HE HE 


003800 01 DATA-ARRAY. 


003900 02 DATA-ARRAY-MEM PIC 99 OCCURS 33 TIMES. 
004000 01 ITAG-ARRAY. 

004100 02 ITAG-ARRAY-MEM PIC 99 OCCURS 20 TIMES. 
OO42LOOHHHHH HHH EHR H EHH HHH EHH RHR HHH HEHEHE HHH HEHE H 
004300* PROCEDURE DIVISION # 


OO 440 Oe HH HH HHH RH HHH HHH HK EEK HEHE HHH HEE HERE 


004500 PROCEDURE DIVISION. 
004600 START-OF-SLAVE. 


004700 DISPLAY S-DOLLAR. 

004800 CALL “CGET" USING CCODE, IFUN, ITAG-ARRAY, IL, IONUMBER. 
004900 PERFORM PRINT-GET-PARAMS THROUGH CHECK-RETURN-CC. 
005000 IF CCODE IS NOT EQUAL TO ZERO GO TO CREJECT-PAR. 

005100 GO TO POPEN, PREAD, PWRITE, PCONTROL DEPENDING ON IFUN. 
005200 POPEN. 

005300 DISPLAY S-DOLLAR. 

005400 DISPLAY OO-DOLLAR. 

005500 MOVE ZEROES TO ITAG-ARRAY. 

005600 GO TO CACCEPT-PAR. 

005700 PREAD. 

005800 DISPLAY S-DOLLAR. 

0053900 DISPLAY RO-DOLLAR. 

006000 PERFORM LOOP1 VARYING I FROM 1 BY 1 UNTIL 

006100 I IS GREATER THAN 20. 
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006200 
006300 
006400 
006500 
006600 
006700 
006800 
006900 
007000 
007100 
007200 
007300 
007400 
007500 
007600 
007700 
007800 
007900 
008100 
008200 
008300 
008400 
008500 
008600 
008700 
008800 
008900 
009000 
009100 
009200 
009300 
009400 
009500 
009600 
009700 
009800 
009900 
010000 
010100 
010200 
010300 
010400 
010500 
010600 
010700 
010800 
010900 
011000 
011100 


PERFORM INCREASE-LOOP VARYING T FROM 1 BY 1 UNTIL 
T IS GREATER THAN IL. 
GO TO CACCEPT-PAR. 
LOOP7. 
MOVE 7 TO ITAG~ARRAY-MEM(I). 
LOOP1. 
MOVE 1 TO ITAG-ARRAY-MEM(I). 
LOOP2. 
MOVE 2 TO ITAG-ARRAY-MEM(I). 
INCREASE-LOOP. 
MOVE T TO DATA-ARRAY-MEM(T). 
PWRITE. 
DISPLAY S-DOLLAR. 
DISPLAY WO-DOLLAR. 
PERFORM LOOP7 VARYING I FROM 1 BY 1 UNTIL 
I IS GREATER THAN 20. 
CACCEPT-PAR. 
CALL "CACCEPT" USING CCODE, ITAG-ARRAY, DATA-ARRAY, IL. 
PERFORM CHECK-RETURN-CC. 
IF IFUN = 3 PERFORM PRINT-DATA. 
GO TO START-OF-SLAVE. 
CREJECT-PAR. 
CALL "CREJECT" USING CCODE, ITAG-ARRAY. 
PERFORM CHECK-RETURN-CC. 
GO TO START-OF-SLAVE. 
PCONTROL . 
DISPLAY CO-DOLLAR. 
IF ITAG-ARRAY-MEM(1) = 14 GO TO CREJECT-PAR. 
PERFORM LOOP2 VARYING I FROM 1 BY 1 UNTIL 
I IS GREATER THAN 20. 
GO TO CACCEPT-PAR. 
PRINT-DATA. 
DISPLAY "DATA RECEIVED FROM THE MASTER: ". 
_ DISPLAY DATA-ARRAY. 
PRINT-GET-PARAMS. 
DISPLAY “ CCODE=", CCODE, " IFUN=", IFUN, " IL=", IL, 
" TONUMBER=", IONUMBER. 
DISPLAY "ITAG RECEIVED: ". 
DISPLAY ITAG-ARRAY. 
CHECK-RETURN-CC., 
IF CCODE IS NOT EQUAL TO ZERO 
PERFORM SOMETHING-WENT-WRONG. 
DISPLAY SO-DOLLAR, “EVERYTHING OKAY". 
SOMETHING-WENT-WRONG. 
CALL “CPCHECK" USING CCODE, DSNUM, ICODE. 
DISPLAY " CCODE=", CCODE, " ICODE=", ICODE. 
ERROR-EXIT. 
DISPLAY "“## SLAVE PROGRAM EXITING ##". 
STOP RUN. 
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off 





CONVENTIONS 


When parameters are specified in the CALL statement the BASIC/ 3000 Interpreter (and compiled 
BASIC) sets up a parameter address table. The parameter address table consists of: 


e The number of parameters. 

e Acode word for each parameter, specifying data type and dimensioning. 
e Areference pointer to each parameter. 

Sis Appendix F of the BASIC/ 3000 Interpreter Manual. 


Because the DSN/DS intrinsics are program-to-program, the BASIC/3000 slave must be a compiled 
and PREPed program. The master program may be either running on the Interpreter or run as 4 
compiled program. 


It is assumed that the user is already familiar with DSN/DS in general and the program-to-program 
intrinsics specifically. Information regarding formal usage or content of the interface intrinsic 
parameters can be found in Section 6. 


COMMON PARAMETERS 


Parameters whose usage is the same throughout the procedures are: 


ccode integer. 
Condition code returned by the DSN/DS Program-to-Program intrinsic. 


-3 = not enough user stack for data transfer. 
-2=CCL 

0 = CCE 

1=CCG 


dsnum integer. 
The DSN/DS communication line number. (analagous to FOPEN file number) 


ttag integer. 
A 20-word array. 


Parameters The BASIC-DSN/DS interface routines pack and unpack the data specified in the 
parameter lists of the master and the slave programs. The user must insure that 
the number of parameters specified on the master and the slave sides are the same 
and that the data types correspond. If the sending and receiving data types are not 
the same, the resulting data will be unpredictable. 
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Special care must be taken when passing string variables (simple strings or string arrays). String 
variables have both a physical (i.e. maximum) length and a logical (i.e. current) length. The logical 
length is never greater than the physical length and may, in fact, be smaller. Since PTOP packs string 
variable parameters according to their logical lengths, but unpacks according to the physical length of 
the receiving string variables, the same string variable cannot be used for both sending and receiving if 
its physical length exceeds its logical length. 


For example, suppose NO$ is a 10 character string which currently has the value JOHN. N’s physical 
length is 10 but its logical length is only 4. If a master PTOP program were to BPWRITE NO$, only 4 
characters of data will be sent across the line. If the slave PTOP program were to call BACCEPT with 
another 10 character string, say MO$, the value of MO$ after the BACCEPT would be J OHNxxxxxx, 
where the xs are undefined. The logical length of MO$ would now be equal to its physical length, 
which is 10. 


As another example, suppose the master PTOP program were to pass two 10 character strings to 
BPWRITE (NO$ and N1$), and the slave PTOP program called BACCEPT with two 10 character strings 
(M0$ and M1$). If NO$ = JOHN and N1$ = JANE DOE, the resulting values of MO$ and M1$ would be 
JOHN JANE and DOExxxxxxx, respectively. (The xs are undefined characters. ) 


These anomalies are consistent in BASIC with the rules governing access to other media in which the 
length of strings is not inherent (for example, binary files). There are several ways to avoid these 
problems. The first method, which is illustrated in the example BASIC PTOP programs in this section, 
is to pad all strings with blanks before transmitting them (i.e. before BPWRITE or before BPACCEPT of 
a BPREAD). Another, more sophisticated approach, would be for the sending side to pass the logical 
lengths of the strings in the itag array. The receiving side would supply only one parameter, a string 
which is large enough to hold all of the strings which were sent. This string could then be unpacked 
by the user program using the information in the tag array and the substring functions of BASIC. 


There is one more anomaly involved in passing strings. Since strings are always unpacked starting on 
word boundaries, it is not possible to unpack an even length string into two odd length strings. 
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BPOPEN 
This procedure is the BASIC callable interface to POPEN. 


Calling Sequence: 


CALL BPOPEN (ecode ,dsnum,dsdevice ,progname , aa Chacala © (lal eae 


0 
stacksize\ f{dlsize\ fmaxdata 
0 *\o *\0 : 
buf fsize) 
Where: 
dsdevice string. 
The DS line class, node name, or logical device number (string must have at least 
one trailing blank). 
progname string. 
Name of remote slave program (terminated with a blank). 
entryname string. 
Secondary entry point into the slave program (terminated with a blank). 
param integer. 
Value placed in Q-4 of the slave program stack. 
flags MPE parameters used to control slave program loading. See Section 6 of this 
stacksize manual or the MPE Intrinsics Reference Manual for usage. 
dlsize 
maxdata 
bufsize integer. 


Maximum number of words per PTOP transfer. 
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BPREAD 
This procedure is the BASIC interface routine to PREAD. 


Calling Sequence: 
CALL BPREAD(ccode ,dsnum, igth 0°49 param list) 


Where: 


lgth integer. 
Number of words received in transfer. 


param list := param [ ,param list] where paramis any BASIC supported data type (such as 
STRING, INTEGER, REAL ARRAY) 


NOTE _ 


The BASIC interface routines: BPREAD, BPWRITE, and 
BACCEPT differ significantly from the PTOP intrinsics in 
the target/tcount vs. parameter list data schemes. 
The parameter list allows the BASIC user to send and 
receive heterogeneous data items. A contiguous buffer 
is built on the User’s stack for the transfers. 


BPWRITE 
This procedure is the BASIC callable interface to PWRITE. 


Calling sequence: 


CALL BPWRITE (ceode dsnum,¢7 ‘49, param list) 


BPCONTROL 
This procedure is the BASIC interface routine to PCONTROL. 
Calling Sequence: 


CALL BPCONTROL (ecode,dsnum,itag) 
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BPCLOSE 
This procedure is the BASIC interface routine to PCLOSE. 
Calling Sequence: 


CALL BPCLOSE(ccode,dsnum) 


BGET 
This procedure is the BASIC interface routine to GET. 


Calling Sequence: 


CALL BET ccode,ifun 59, {') rare ’ 


Where: 

ifun integer. 
Receives the function code from the request issued by the remote master program. 
(Refer to Section 6 for ifun meanings.) 

al integer. 
The number of words expected or sent on BPREAD or BPWRITE. 

tonumber integer. 
Valid if both ecode=1 and ifun=5. File number of completed non-DS I/O 
without wait. 

BACCEPT 


This is the BASIC callable interface routine to ACCEPT. 


Calling Sequence: 


CALL BACCEPT(ecode,ifun Aa param list) 
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BREJECT 
This is the BASIC callable interface routine to REJECT. 
Calling Sequence: 


CALL BREJECT (ccode,itag) 


BPCHECK 
This is the BASIC callable routine to PCHECK. 
Calling Sequence: 


CALL BPCHECK (ccode ,dsnum,icode) 


Where: 

dsnum integer. 
For a master program, this number is returned by BPOPEN. For a slave program, 
this number is always 0. 

teode integer. 
The number returned identifies the last error encountered. Refer to Appendix B, 
under the heading "DSN/DS Functional Errors", for meaning. 

EXAMPLES 


Master PTOP Program 


MASTER 

, REM HHH HHH HHH HHH HEHEHE EHH HERE KHER HEHEHE REE 
2 REM: 
3 REM; MASTER PTOP PROGRAM 
4 REM: 
5 REM 3 #68 9 4 8 6-H Ht 26 968 98 06 HEHEHE HE HE EH HE HE HE HH HE 6 HE EE HH HE HEE HE EE HAE HEHE 
6 REM: 
¢ REM: THIS PROGRAM ISSUES A BPOPEN TO THE SLAVE PROGRAM AND 
8 REM: USES THE TAG FIELD TO SEND SUBTYPES FOR THE BREAD/BWRITE 
9 REM: OPERATIONS. 
10 REM: 
11 REM 5 9 9 9 06 4 9 96-96 48 9696 Ht 98 HE HE 96 HE HE HE HH HE 98 HE EE HE HE 90 HE EE HE HE HE HE HE SE HE HE SE IE HE HE 

110 REM: DATA DECLARATIONS 


120 REM: 3 HH 56 Ht ae He HHH EERE KEKE EEE HERE ERE EEK 
130 REM: BASIC PTOP INTRINSIC PARAMETERS-- 

140 INTEGER C,D,F,I0,L 

150 REM: C=CC, D=DSNUM, F=FLAGS, IO=ICODE, L=LENGTH 

160 INTEGER I1[20] 

165 MAT I1=ZER 


170 
180 
190 
200 
210 
220 
221 
222 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
325 
330 
335 
340 
345 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
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REM: I1[#]=TAG FIELD 

DIM DO$[10] ,PO$[10] 

REM: DO$=DSLINE, PO$=REMOTE PROGRAM 
REM: =s=>=* LOCAL VARIABLES----- 

DIM N1$[20] ,N2$[20] ,A1$[20] ,R$[40] 
REM: Ni$,N2$=NAMES; A1$[20]=ADDRESS; R$=RECORD (NAME , ADDRESS) 
DIM B$[20] 

REM: B$= BLANK PADDING STRING 

DIM c$[20] ,N$[22] 

REM: C$=USER COMMAND/TEXT LINE 

REM: N$=ENTER NAME MESSAGE 


REM: 469 HE HE HE HE HE HEE HE HE HE HE HE HE HE EE HE HEE HEHE HE HEE HE HE HE HE HEHEHE HE HE HE HEE HE HE HEHE HEE HE HE HEE HE HEE HE 


REM: 


REM: START OF PROCESSING 

REM: 

PREM «6-36-46 94 96-46 46-46-46 46 98 9 9 HE HE 96 HE EE HE HE AE EE A A aE HE aE A HE HE HE EE EHH a aH HE EE HEE 
REM: ==--= INITIALIZATION OF VALUES AND BPOPEN----~ 

PRINT "ENTER DSLINE CLASS NAME" 

INPUT DO$ 

PRINT "ENTER SLAVE PROGRAM NAME” 

INPUT PO$ 

N$="ENTER NAME " 

B$=" " 


CALL BPOPEN(C,D,D0$, PO$) 
IF C=O THEN GOTO 410 
PRINT "### ERROR ON BPOPEN ###" 


GOSUB 7000 

STOP 

PREM ¢ 45 46 46-96 46 56-46-46 96 98 AE 0b SE HE HE 98 HE HE HE HE EH HE aE EE AE EE HE HE HE HR HE HE HEHE HEH HR 
REM: WELCOME MESSAGE AND MENU 


REM: 463 HE HEE HE HE HEHE HE HE HE HEHE HE HE HEE HE HEE HE HE HE HE HEHEHE HEE HEHEHE HEE HEHE HEE HE HEHEHE HHH HH HE HH HH 


PRINT "MASTER AND SLAVE PTOP RUNNING” 


PRINT " © 

PRINT "##% OPERATIONS MENU ###" 

PRINT " N - NAME CHANGE" 

PRINT " A - ADDRESS CHANGE" 

PRINT " I - INSERT PERSON" 

PRINT ° D - DELETE PERSON" 

PRINT ° LN - LIST NAME AND ADDRESS" 

PRINT " LA - LIST ALL NAMES AND ADDRESSES” 
PRINT " EX - EXIT PROGRAM" 

REM: HHH RHR HHH RRR H HRM HEH HH 
REM: OPERATION REQUEST 


REM: 36-8 HEHE HEHEHE HEHE HEE HE IEEE IE AE HER HEHE AE HEHE AE HE HE HE EE HEHE HE HEHE HE HEHEHE HE HE EEE HE HE HE HEHE 


PRINT " " 
PRINT "ENTER OPERATION" 


LINPUT C$ 

IF C$[1,1]="N° THEN GOTO 1000 
IF C$[1,1]="A'" THEN GOTO 2000 
IF c$[1,1]="I" THEN GOTO 3000 
IF C$[1,1]="D" THEN GOTO 4000 


IF C$[1,2]="LN" THEN GOTO 5000 
IF C$[1,2]="LA" THEN GOTO 6000 
IF C$[1,2]="EX" THEN GOTO 8000 
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670 

680 
1000 
1010 
1020 
1030 
1040 
1045 
1050 
1060 
1070 
1080 
1084 
1085 
1086 
1090 
1100 
1110 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2084 
2085 
2086 
2090 
2100 
2200 
3000 
3010 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3084 
3085 
3086 
3090 
3100 
3110 
4000 
4010 
4020 
4030 
4040 
4050 


PRINT "“### UNRECOGNIZED OPERATION ###" 


GOTO 450 

PREM = 9 36-96 96-46 96 46 96 36 9 Ht HE 6 HE EHH HE HE HEHEHE HEHEHE EH EHH 
REM: NAME CHANGE 

REM : 2 4 9896 36 0 56 96 9 96 HHH HEHEHE HHH HHHHHEKEREH HEHEHE 
PRINT N$ 

LINPUT N1$ 


IF N1$=""" THEN GOTO 450 

IF I1[1]<O OR 11[1]>1 THEN GOSUB 7000 

PRINT "ENTER NEW NAME" 

LINPUT Ne$ 

11[1]=1 

REM: PAD STRINGS WITH BLANKS BEFORE XMITTING 

N1i$=N1$+B$ 

N2$=N2$+B$ 

CALL BPWRITE(C,D,11[#] ,N1$,N2$) 

GOSUB 7000 

GOTO 1000 

REM : 96 HE HE HE HE HE HE HE HE HEH He AE HE HE HEE HE HE HE HEH HE HE HE EH EHH HEH HEHEHE HE HEE HE HEE HEHEHE HE HE HE HE HE 
REM: ADDRESS CHANGE 

REM . 98 HE HE HE HE HE 9 HE HE HEH HE HH HH EE HE EH EEE EH HH HEHE HE HEHEHE HEH HE HEE 
PRINT N$ 

LINPUT N1$ 

IF N1$="" THEN GOTO 450 

PRINT "ENTER NEW ADDRESS" 

LINPUT A1$ 

11[1]=2 

REM: PAD STRINGS WITH BLANKS 

N1$=N1$+B$ 

A1$=A1$+B$ 

CALL BPWRITE(C,D,11[*] ,N1$,A1$) 

GOSUB 7000 

GOTO 2000 

REM be HEH HEHE HE HE HE HE HE HEH HEHE HE EH HEHE HE HE HEH He HEHE HE HEE HEHE HE HEE HSE HE IE HEE HE HE EE 
REM: INSERT NAME . 

REM : HE HEHE HE HE HH He HEE HO HE HE HE HE IE HE HEE HE HE HE HE HE HE HE IE IE IE HEHE HE HE IE HE EH HE HE HEHE HHH HHH 
PRINT N$ 

LINPUT N1$ 

IF N1$="" THEN GOTO 450 

PRINT "ENTER ADDRESS" 

LINPUT A1$ 

11[1]=3 

REM: PAD STRINGS WITH BLANKS 

NI$=N1$+B$ 

A1$=A1$+B$ 

CALL BPWRITE(C,D,11[#] ,.N1$,A1$) 

GOSUB 7000 

GOTO 3000 

REM : RHR HHH HEE HHH HHH HK EHR RHEHKHKEK KE HHHHEKHKHHEHHHKRKHHEE 
REM: DELETE PERSON 

REM : HH HR HH HK HHH HR HERE KHER H HERE RKHE HERE HHH 
PRINT N$ 

LINPUT N1$ 

IF N1$=""" THEN GOTO 450 


4060 
4065 
4066 
4070 
4080 
4090 
5000 
5010 
5020 
5030 
5040 
5050 
5060 
5067 
5068 
5070 
5080 
5090 
5100 
5110 
5120 
5130 
5140 
6000 
6010 
6020 
6030 
6040 
6050 
6060 
6070 
6080 
6090 
7000 
7010 
7020 
7030 
7040 
7050 
7060 
7065 
7070 
7080 
7090 
7100 
7110 
7120 
7130 
7140 
7150 
7160 
7170 
7180 
8000 
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11[1]=4 
REM: PAD NAME WITH BLANKS 


N1i$=N1$+B$ 

CALL BPWRITE(C,D,11[#*],N1$) 

GOSUB 7000 

GOTO 4000 

REM b HIE HH HHH HH HHH HK HK HH K HHH HEHEHE HEHE HEE HHH 
REM: LIST NAME AND ADDRESS 

REM ¢ Pw eererrrrrrrrrrrrrrrrrr rrr rer errs te Ste teehee 
PRINT N$ 

LINPUT N1$ 

IF N1$="" THEN GOTO 450 


11[1]=1 

REM: PAD NAME WITH BLANKS 

N1$=N1$+B$ 

CALL BPWRITE(C,D,11[*],N1$,N1$) 

IF C=O THEN CALL BPCONTROL(C,D,11[*]) 
IF C<>O OR I1[1]<>1 THEN GOTO 5000 


L=-80 

CALL BPREAD(C,D,L,I1[#],R$) 

GOSUB 7000 

PRINT R$ 

GOTO 5000 

PREM ¢ #6 3636 46 46 96 96 8 96 HE aE HE HE HEHE HE HEHE EH HE HEE AE HEHE AE HE HE HEHE HEE HEE HR HEHEHE HE EEE 
REM: LIST WHOLE LIST 

PREM 2 469646 $6461 HE 96 HEHE HE HEHE HE HEE IE HE HEHE HE EE HEHEHE HEE HEHE HEHE HEHE HE HEE HEHE HN HH 


L=-80 
1i[{1]=2 
CALL BPREAD(C,D,L,11[*],R$) 


GOSUB 7000 

PRINT R$ 

IF I1[1]=O THEN GOTO 6000 

GOTO 450 

PREM 46-2646 48-96 8 8 96 HE HE EE HEE EE HE HE HE HE IE HE HE HE HE HE HE EEE HE aE HE HE HEH HE 
REM: CONDITION CODE AND STATUS CHECK 


REM ba HE HEHEHE SEE HE HHH EHH HHH HEHEHE HEHEHE HH HHHH ERK HEHE EHH HEHEHE 
IF C>O THEN GOTO 7120 

IF C<O THEN GOTO 7150 

CALL BPCONTROL(C,D,11[#]) 

IF 11[1]<o OR I1[1]>1 THEN GOTO 7090 

REM: REMINDER--CHECK ABOVE LINE 

REM: *## EVERYTHING OKAY ### 

RETURN 

REM: #**# BAD RECORD ### 

PRINT "“### NON-EXISTENT RECORD ###" 
RETURN 

REM: ### CCG ### 

PRINT “### REQUEST REJECTED BY SLAVE ###" 
RETURN 

REM: ### CCL ### 

CALL BPCHECK(C,D,I0) 

PRINT "### PTOP ERROR:";10;" ###" 

RETURN 


REM: HHRKK HHH KKK HEHE EEK HK HHH EEE HH HEHEHE EHH HEH HHH HH HHH HH 


C9 
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8010 REM: EXIT 

BOLO REM: HEHHHHHHE HEH HARARE HEH HEHEHE HHH HEHEHE HHERHE 
8030 CALL BPCLOSE(C,D) 

8040 GOSUB 7000 

8050 END 
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Slave PTOP Program 


SLAVE BF 
4 PREM = 9 26-58 96 9694-46-46 96-4 8-36 46 HE HE HE HE HE HEE HE HE HE HE HEE HE HE AEE HE HE HE AE HE HE HEHE HE HE 
2 REM: 
3 REM: SLAVE PTOP PROGRAM 
4 REM: 
SRE ¢ 2 96-46 4696-46-96 48 26 96 08 EAE 9 HE 98 AEE HE HE HE a HE a HE HE HE HEE EE HE aE HE HE EE HE EH 
6 REM: 
7 REM: THIS PROGRAM ACCEPTS DATA FROM THE MASTER AND 
8 REM: ACCORDINGLY CHANGES, INSERTS, OR DELETES ENTRIES. 
9 REM: IT ALSO TRANSMITS NAME/ADDRESS RECORDS TO THE MASTER 


10 REM: 


100 REM: HEHE HEHE HEHEHE HEHE HE HE HE HEHE IE HE HEE HE HE IE HE HE HE HE HE HE HE HE HEHE EEE HEHE HEE HHH HH HHH HHH EH 


110 REM: DATA DECLARATIONS 
12.0 REM ¢ #4638 46-46 46 46-46-06 ae ab 4 EE EE HE HE HH HE HE aE aE EE HHH HE HE EE EE HE HEE HEE 
130 REM: ----- BASIC PTOP INTRINSIC PARAMETERS---~- 


140 INTEGER C,F,L,1I0,I,D 

150 REM: C=CC; F=FUNCTION; L=IL; I0=1/0; I=ICODE; D=DSNUM 
155 D=0 

160 INTEGER 11[20] 

170 REM: I1[#]=TAG FIELD 

180 REM:: «<--> LOCAL VARIABLES----- 

190 DIM N1$[20] ,N2e$[20],A1$[20] 

200 REM: N1i$,N2$=NAME; A1$=ADDRESS 

210 DIM NO$[20,20] ,A0$[20,20] 

220 REM: NO$,AO$=LIST OF NAMES AND ADDRESSES 
225 DIM B$[20] 

226 REM: B$= BLANK PADDING STRING 

230 INTEGER P,S 

240 REM: P=LAST RECORD POINTER; S=STATUS 

250 INTEGER X 


255 X=0 

256 S=1 

BOO REM; 3245694 96 96 4 9 HE aE 9 HE aE HE HE HE A HE aE aE HE HE EE HE HE HE HEHE HE AE EE HE EE RR 
810 REM: START OF PROGRAM 


PPM ARLE 
830 CALL BGET(C,F,11[*]) 

845 IF C<>0 THEN GOTO 7000 

850 GOSUB 5000 

870 GOSUB F OF 1000,2000,3000, 4000 

880 GOTO 800 


1000 REM: HXHRRRHHHHHHEAHH HERRERA HH R HER EHK HEHEHE RHEE RRR N HERE EE 


1010 REM: BPOPEN 

1020 REM ¢ 3694-969 969696 98 4 9696 #6 HE EE HE HE HEE a EE AE HEHE HE HEHE HE EHH 
1030 CALL BACCEPT(C,F) 

1050 GOSUB 5000 

1055 REM: INITIALIZE NAME AND ADDRESS ARRAYS 
1056 B$=" i 

1060 FOR P=1 TO 9 

1070 READ NO$[P] ,AO$[P] 

1074 REM: PAD STRINGS WITH BLANKS 

1075 NO$[P]=NO$[P]+B$ 

1076 AO$[P] =A0$[P]+B$ 
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1080 
1085 
1090 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
3000 
3010 
3020 
3030 
3035 
3040 
3050 
3055 
3060 
3070 
3080 
30390 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 
3290 
3300 


NEXT P 

P=9 

RETURN 

REM ¢ #4 #6 a 46-96 9-96-96 96-96 46 46 96-96 9 98-46 96 96-26 9 HE HE AEE HE HE He HE 9 HE HE 9 9 EH a EE EE 
REM: READ 

REM ¢ 444 4696 3 te 96-6 96 96 1 96 98 6 46 9898 He 98 HE He 98 HE 96 HE aE HE HEH HE HEHE HE aE HE HE HH EE HE HE HE HEE 


IF 11[1]=2 THEN GOTO 2090 

REM: *##* LIST SINGLE RECORD ##+# 

11[1]=S=1 

CALL BACCEPT(C,F,11[#] ,NO$[PO] ,AO$[PO]) 

GOSUB 5000 

RETURN 

REM: #***LIST ALL RECORDS ### 

IF S<>0 THEN PO=0 

S=0 

PO=P0+1 

IF PO=P THEN S=1 

11[1]=s 

CALL BACCEPT(C,F,11[#] ,NO$[PO] ,AO$[PO]) 

GOSUB 5000 

RETURN 

REM : 96 9 26-48 ot 36 4 96 96 4 46 96 16 HE HE HHH HHH HEHEHE HEHEHE HEHE 
REM: WRITE 

PREIM ¢ 94 9 9 96-4 ot 36 96 at 94 4 96 HE 9 06 HE 9 aE HE HE HE HE HEE 96 HE 9 HE 9 HE 9 HE HE HE EHH EH aE a EE 
GOSUB I1[1] OF 3040,3160,3290,3410 

RETURN 


REM: ###ENTRY: NAME CHANGE #*# 
CALL BACCEPT(C,F,1I1[#] ,N1$,N2$) 
GOSUB 5000 
PO=0 
PO=PO+1 
IF NO$[PO]=N1$ THEN GOTO 3120 
IF PO<>P THEN GOTO 3070 
=-4 
RETURN 
REM: ### NAME FOUND, CHANGE IT ### 


NO$[PO]=N2$ 

$=1 

RETURN 

REM: *##*ENTRY: ADDRESS CHANGE ##+# 
CALL BACCEPT(C,F,0,N1$,A1$) 

GOSUB 5000 

PO=0 

PO=PO+1 

IF NO$[PO]=N1$ THEN GOTO 3250 

IF PO<>P THEN GOTO 3200 

S=-1 

RETURN 

REM: ### RECORD FOUND, CHANGE IT ### 
AO$ [PO]=A1$ 

S=1 

RETURN 

REM: #**ENTRY: INSERT NAME 


CALL BACCEPT(C,F,0,N1$,A1$) 
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3310 GOSUB 5000 

3320 IF P=20 THEN GOTO 3380 

3330 P=P+1 

3340 NO$[P]=N1$ 

3350 AO$[P]=A1$ 

3360 S=1 

3370 RETURN 

3380 REM: ###LIST ALREADY FULL #*## 
3390 S=-1 

3400 RETURN 

3410 REM: ##* ENTRY: DELETE NAME ### 
3420 CALL BACCEPT(C,F,0,N1$) 

3430 GOSUB 5000 

3440 PO=0 

3450 PO=P0+1 

3460 IF NO$[PO]=N1$ THEN GOTO 3500 
3470 IF PO<>P THEN GOTO 3450 

3480 S=-1 

3490 RETURN 

3500 REM: ###FOUND RECORD, DELETE IT ### 
3510 NO$[PO]=B$ 

3515 AO$[PO]=B$ 

3520 S=1 

3530 RETURN 

4000 PREM «4-46-4648 96-9698 366 9698 HE EE A a a HE HE HEH EEE HEHE HEE HEE 


4010 REM: BPCONTROL 

4020 PREM «9636 98-4 9898-48 HE 8 98 EE HEE a8 HE HE HE AE AE HE EE HE AEE EAE ETE EE HE HEHE HEHE HE REE 
4030 11[1]=S 

4040 CALL BACCEPT(C,F,11[*]) 

4050 RETURN 

5000 PREM «46-4 964646 96-9648 96 4 984 aE HEE EEE AE a aE EH HE EE HE HEHE HR HEHE HEE 
5010 REM: CONDITION CODE AND STATUS CHECK 

5020 FRE 964848 969646 46 HE HEHE HEHE AE HE HE HE HEE EE EE EE HE A HEE AE HE AE HE HEHE HEE 
5030 IF C>0 THEN GOTO 5070 

5040 IF C<O THEN GOTO 5100 

5050 REM: #*#*#EVERYTHING OKAY ### 

5060 RETURN 

5070 REM: ###* CCG ERROR ##* 

5080 PRINT “### SLAVE: PTOP(CCG) ###° 

5090 RETURN 

5100 REM: #*##* CCL ERROR ##* 

5110 I=0 

5120 CALL BPCHECK(C,I,10) 

5130 PRINT "### SLAVE: PTOP ERROR: ";10;" ###" 

5140 RETURN 

6000 DATA "CHRISTINE', "BRISTOL" 

6010 DATA "MEL", CAMBRIDGE" 

6020 DATA "CAROL" ,' PALO ALTO" 

6030 DATA "LISA, MISA & RICHIE", BRISTOL" 

6040 DATA "LISBET", "ZURICH" 

6050 DATA "JOHN", BERKELEY" 

6060 DATA "CAROLYN",'ST. PAUL" 

6070 DATA "TODD", SANTA CLARA" 

6080 DATA "GARY" ,'SAN FRANCISCO" 
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7000 CALL REJECT(C,11[#]) 
7010 GOTO 830 


























ASCII First Character 
Character Octal Equivalent 
040400 
041000 
041400 
042000 
042400 
043000 
043400 
044000 
044400 
045000 
045400 
046000 
046400 
047000 
047400 
050000 
050400 
051000 
051400 
052000 
052400 
053000 
053400 
054000 
054400 
055000 


> 
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060400 
061000 
061400 
062000 
062400 
063000 
063400 
064000 
064400 
065000 
065400 
066000 
066400 
067000 
067400 
070000 
070400 
071000 
071400 
072000 
072400 
073000 
073400 
074000 
074400 
075000 
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030000 
030400 
031000 
031400 
032000 
032400 
033000 
033400 
034000 
034400 
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000000 
000400 
001000 
001400 
002000 
002400 













































































































APPENDIX 


ASCII CHARACTER SET 


Second Character 
Octal Equivalent 


000101 
000102 
000103 
000104 
000105 
000106 
000107 
000110 
000111 
000112 
000113 
000114 
000115 
000116 
000117 
000120 
000121 
000122 
000123 
000124 
000125 
000126 
000127 
000130 
000131 
000132 


000141 
000142 
000143 
000144 
000145 
000146 
000147 
000150 
000151 
000152 
000153 
000154 
000155 
000156 
000157 
000160 
000161 
000162 
000163 
000164 
000165 
000166 
000167 
0001 70 
000171 
000172 


000060 
000061 
000062 
000063 
000064 
000065 
000066 
000067 
000070 
000071 





000000 
000001 
000002 
000003 
000004 
000005 























































































































Second Character 
Octal Equivalent 


ASCII First Character 
Character Octal Equivalent 





























































































































003000 000006 
003400 000007 
004000 000010 
004400 000011 
005000 000012 
005400 000013 
006000 000014 
006400 000015 
007000 000016 
007400 000017 
010000 000020 
010400 000021 
011000 000022 
011400 000023 
012000 000024 
012400 000025 
013000 000026 
013400 000027 
014000 000030 
014400 000031 
015000 000032 
015400 000033 
016000 000034 
016400 000035 
017000 000036 
017400 000037 
020000 000040 
020400 000041 
021000 000042 
021400 000043 
022000 000044 
022400 000045 
023000 000046 
023400 000047 
024000 000050 
024400 000051 
025000 000052 
025400 000053 
026000 000054 
026400 000055 
027000 000056 
027400 000057 
035000 000072 
035400 000073 
036000 000074 
036400 000075 
037000 000076 
037400 000077 
040000 000100 
055400 000133 
056000 000134 
056400 000135 
057000 000136 
057400 000137 
060000 000140 
075400 000173 
076000 000174 
076400 000175 
077000 000176 
077400 000177 


First Character Second Character 





A 


ACCEPT 6-3, 6-4, 6-6 
and GET 6-7 
and PCONTROL 6 
and POPEN 6-6, 6 
and PREAD 6-6, 6-7 
and PWRITE 6-6, 6-7 
condition codes 6-7 
operation 6-7 
parameters 6-6 
syntax 6-6 

Accessing data bases with data base-access files 5-14 

Activating a data base-access file 5-12 

ACTIVATE intrinsic 6-4 

Autodial 2-6 


~6, 6-7 
-7 


B 


BACCEPT C-5 
BASIC 
and DSCOPY intrinsic 7-15 
and DSCOPYMSG intrinsic 7-17 
Batch job, using remote subsystem from 3-4 
Bell 201 2-5 
Bell 208 2-5 
Bell 209 2-5 
BGET C-5 
Blocking control 8-2 
Blocking factor 2-3, 2-6 
BPCHECK C-6 
BPCLOSE C-5 
BPCONTROL C-4 
BPOPEN C-3 
BPREAD C-4 
BPWRITE C-4 
BREAK 
and DSCOPYMSG 7-5 
and DSCOPY 7-12 
and Network File Transfer 7-5 
and NFT 7-5 
and remote sessions 3-4 
BREJECT C-6 
Buffers, line and continuation 8~8 


INDEX- 1 


Cc 


CACCEPT B-5 
CGET B-4 
CLOSE 6-4 
Closing a line 2-50 
COBOL 
and DSCOPY intrinsic 7-14 
and DSCOPYMSG intrinsic 7-16 
Commands 
issuing local 3-7 
issuing remote 3-1 
Communications link 2-1 
COMP 2-18 
Compression 2-18, 8-10 
and DSCONTROL 8-10 
and DSLINE 8-10 
and I/O configuration 8-10 
and SYSDUMP 8-10 
formats 8-11 
Continuation buffers 8-9 
Control keys, and remote sessions 3-6 
Coordinating master and slave programs 8-3 
CPCHECK B-5 
CPCLOSE B-3 
CPCONTROL B-3 
CPOPEN B-2 
CPREAD B-3 
CPWRITE B-3 
CREATE 6-4 
Creating a data base-access file 5-7 
CREJECT B-5 
CSHBSCO 2-8 
CSSBSCO 2-8 


INDEX-2 


D 


Data base-access file 
activating 5-12 
creating 5-7 
example 5-11 
parameters 5-7 
syntax 5-7 
Data bases, accessing 5-14 
DBA example 5-11 
DBA file 
accessing data bases 5-14 
activating 5-12 
creating 5-7 
parameters 5-7 
syntax 5-7 
Debugging DS applications 8-8 
DEV parameter 4-1 
Dialing the remote computer 2-21 
Dialup line multiple user example 2-25, 2-26, 2-27 
DMOVEIN 6-4 
DMOVEOUT 6-4 
DS applications 8-1 
debugging 8-8 
DS header 8-2 
DS line number 2-4 
DS performance 8-11 
and communication links 8-11 
and remote listing 8-12 
DSCONTROL 9- 1s 8-12 
and compression 8-1Ondent 8-11 
command execution order 9-6 
error messages A-6 
examples 9-7 
informatory messages A-5 
operation 9-5 


INDEX -3 


DSCOPY 7-1 
and BREAK 7-5 
and KSAM files 7-5 
and negative file codes 7-5 
BASIC example 7-19 
BASIC intrinsic 7-15 
COBOL example 7-18 
COBOL intrinsic 7-14 
ending interactive mode 7-6 
event recording 7-6 
FORTRAN example 7-18 
FORTRAN intrinsic 7-14 
general error messages A-9 
interactive mode 7-5 
internal errors A-11 
multiple requests 7-3 
operation 7-5 
parameters 7-3 
Pascal intrinsic 7-15 
programmatic mode 7-12 
source and target files 7-5 
syntax 7-3 
SPL intrinsic 7-12 
use 7-4 : 
DSCOPY intrinsic, error returns A-10 
DSCOPYMSG 7-12 
and BREAK 7-12 
BASIC intrinsic 7-17 
COBOL data types 7-12 
COBOL intrinsic 7-16 
FORTRAN intrinsic 7-16 
Pascal intrinsic 7-17 
SPL intrinsic 7-15 
Dsdevice parameters 
with FILE 4-1 
with FOPEN 4-14 
DSLINE syntax errors A-1 
DSLINE 2-17, 2-50 
and compression 8-10 
examples 2-51 
parameters 2-17 
syntax 2-17 
DSLIST 10-1 
DSN/DS with DSN/X.25 10-1 
DSN/DS without DSN/X.25 10-2 
running 10-1 


INDEX -4 


DSN/DS BASIC interface C-1 

and string variables C-1 

common parameters C-1 

conventions C-1 

example C-6 
DSN/DS BASIC interface intrinsics C-3 
DSN/DS COBOL interface B-1 

common parameters B-1 

conventions B-1 

example B-5 
DSN/DS COBOL interface intrinsics B-2 
DSN/DS functional errors A-3 
DSTEST 10-1, 10-2 

diagnostic mode 10-4 

normal mode 10-3 

with Remote File Access 10-2 

with RFA 10-2 
DSTEST, CONFIG 10-6 


E 


Entering remote mode 3-6 
Error messages A-l 
Errors 
at line opening 2-48 
at opening dialup line 2-49 
DSCONTROL informatory A-5 
DSCONTROL A-6 
DSCOPY general messages A~-9 
DSCOPY internal A-11 
DSCOPY intrinsic A-10 
DSLINE syntax A-1l 
DSN/DS functional A-3 
X.21 call process signals A-11 
X.21 DCE provided information A-12 
X.21 messages A-11 
Establishing a remote link, 
dialup example 2-40 
hardwired example 2-36 
X.25 example 2-45 
Establishing a second remote link 
dialup example 2-42 
hardwired example 2-37 
XK.25 example 2-47 


INDEX-5 


Examples 
BASIC DSCOPY 7-19 
COBOL DSCOPY 7-18 
data base-access file 5-11 
dialup line multiple user 2-25, 2-26, 2-27 
DBA file 5-11 
DSCONTROL 9-7 
DSCOPY 7-7 
DSLINE 2-51 
DSN/DS BASIC interface C-6 
DSN/DS COBOL interface B-5 
establishing a remote line dialup 2-40 
establishing a remote line hardwired 2-36 
establishing a remote line X.25 2-45 
establishing a second remote link dialup 2-42 
establishing a second remote link hardwired 2-37 
establishing a second remote link X.25 2-47 
exclusive option 2-24 
FCOPYing toa remote system 4-8 
FORTRAN DSCOPY 7-18 
initiating the local session dialup 2-39 
initiating the local session hardwired 2-35 
initiating the local session X.25 2-44 
locally running a remote program 4-10 
locally sorting a remote file 4-5 
multiple line dialup 2-38 
multiple line hardwired 2-34 
multiple line X.25 2-43 
multiple user dialup line 2-25, 2-26, 2-27 
multiple user 2-23 
Network File Transfer 7-7 
NFT 7-7 
programmatic access 4-15 
programmatic DSCOPY 7-18 
PTOP 6-25 
PTOP master program 6-25 
PTOP slave program 6-27 
remote off-line listing 4-3 
remote programs and local data 4-12 
Exclusive option example 2-24 
Exclusive 2~18, 2-22, 5-8 
Execution priority 5-9 


F 


Failures 
dialup line opening 2-49 
line opening 2-48 
FCHECK 6-4 
FCLOSE 6-4 
FCONTROL 6-4 
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FCOPYing to a remote system 4-8 
and DSCOPY intrinsic 7-14 
and DSCOPYMSG intrinsic 7-16 
FOPEN 6-4 
FORTRAN 
FREAD 6-4 
FWRITE 6-4 


G 


GET 6-3, 6-4, 6-8 
and ACCEPT 6-7 
and IOWAIT 6-9 
and PREAD 6-8 
and PWRITE 6-8 
condition codes 6-9 
functional return 6-8 
operation 6-9 
parameters 6-8 
syntax 6-8 

GETDSEG 6-4 


H 


Hardwired line, opening 2-2 

Hardwired Serial Interface 2-2, 2-5, 2-8, 2-18 
HIPRI 2-29, 2-31, 5-10 

HP 3000 Series 30/33/40/44 2-2, 2-5 

HP 3000 Series 30/33/40/44/64 2-2, 2-5 
HP 3000 Series I/II 2-2, 2-5 


HP 30010A 2-2, 2-5 
HP 30020A 2-2, 2-5 
HP 30020B 2-2, 2-5 
HP 30055A 2-2, 2-5 
HP 30360A 2-2 
HP 32710T 2-5 
HP 37220T 2-5 
HP 37230A 2-5 


HSI 2-2, 2-5, 2-8, 2-18 
hardwired sample I/O device table 2-8 


INDEX-7 


ID sequences 2-21, 2-28 
Initiating the local session 
dialup example 2-39 
hardwired example 2-35 
X.25 example 2-44 
INP 2-2, 2-5, 2-8, 2-18 
dialup sample I/O device table 2-14 
hardwired sample I/O device table 2-10 
Input priority 5-9 
Inputpriority 2-29, 2-31 
Intelligent Network Processor 2-2, 2-5, 2-8 2-18 
Interactive access 4-1 
Interactive mode, ending 7-6 
Interactive Mode, entering MPE commands 7-6 
Interprocess Communications 1-1, 6-1, 8-1 
advantages over PTOP 8-8 
and PTOP 8-4 
Intrinsics 
PTOP 6-5 
PTOP ACCEPT 6-6 
PTOP GET 6-8 
PTOP PCHECK 6-10 
PTOP PCLOSE 6-11 
PTOP PCONTROL 6-12 
PTOP POPEN 6-14 
PTOP PREAD 6-20 
PTOP PWRITE 6-22 
PTOP REJECT 6-24 
IODSO 2-8 
IODSTRMO 2-8 
IODSTRMX 2-8 
IODSX 2-8, 2-17 
IOINPO 2-8 
IOWAIT, and GET 6-9 
IPC 1-1, 6-1, 8-1 
advantage over PTOP 8-8 
and PTOP 8-4 
Issuing local commands 3-7 
Issuing remote commands 3-1 
I/O configuration, and compression 8-10 


K 


KILL 6-4 

KSAM files 
and DSCOPY 7-5 
and Network File Transfer 7-5 
and NFT 7-5 


INDEX- 8 


L 


LDEV 2-8 
LDN 2-8 
Line and continuation buffers 8-8 
Line buffer 2-3, 2-6 
Line number 3-2 
Line opening failures 2-48 

dialup 2-49 
Local commands, issuing 3-7 
Local ID sequence 2-19, 5-7 
Locally running a remote file 4-10 
Locally sorting a remote file 4-5 
Logical device number 2-8 


Master PTOP intrinsics 6-2 
Message Switching Procedure 8-7 
Modem 2-5 
Modulator-demodulator 2-5 
MPE commands 

comparison with PTOP 6-4 

entering during Interactive mode 7-6 
MSP 8-7 
Multiple data bases, and RDBA 5-3 
Multiple DSCOPY requests 7-3 
Multiple line example 

dialup 2-38 

hardwired 2-34 

X.25 2-43 
Multiple remote access 8-13 
Multiple user dialup line example 2-25, 2-26, 2-27 
Multiple user example 2-23 
Multiple users 2-22 


INDEX-9 


N 


Network File Transfer 1-1, 7-1, 8-1 
and BREAK 7-5 
and KSAM files 7-5 
and negative file codes 7-5 
consuming system 7-1 
DSCOPY operation 7-5 
DSCOPY parameters 7-3 
DSCOPY syntax 7-3 
DSCOPY use 7-4 
ending interactive mode 7-6 
event recording 7-6 
features 7-1 
initiating system 7-1 
interactive mode 7-5 
multiple DSCOPY requests 7-3 
producing system 7-1 
programmatic mode 7-12 
source and target files 7-5 
NFT 1-1, 7-1, 8-1 
and BREAK 7-5 
and KSAM files 7-5 
and negative file codes 7-5 
consuming system. 7-1 
DSCOPY operation 7-5 
DSCOPY parameters 7-3 
DSCOPY syntax 7-3 
DSCOPY use 7-4 
ending interactive mode 7-6 
event recording 7-6 
features 7-1 
initiating system 7-1 
interactive mode 7-5 
multiple DSCOPY requests 7-3 
producing system 7-1 
programmatic mode 7-12 
source and target files 7-5 
Nocomp 2-18 
Node name 2-31 


0 


Opening a hardwired line 2-2 
Opening a line 2-2 

with Remote Hello 2-31 
Opening a telephone line 2-5 _ 
Opening multiple lines 2-34 


INDEX-10 


Pp 


Pascal 
and DSCOPY intrinsic 7-15 
and DSCOPYMSG intrinsic 7-17 
PCHECK 6-2, 6-3, 6-4, 6-10 
condition codes 6-10 
functional return 6-10 
operation 6-10 
parameters 6-10 
syntax 6-10 
PCLOSE 6-2, 6-11 
condition codes 6-11 
operation 6-11 
parameters 6-11 
syntax 6-11 
PCONTROL 6-2, 6-4, 6-12 
and ACCEPT 6-6, 6- 
condition codes 6-12 
operation 6-12 
parameters 6-12 
syntax 6-12 
PDN 2-17 
PHONELIST 2-21 
POPEN 6-2, 6-4, 6-14 
and ACCEPT 6-6, 6-7 
condition codes 6-18 
functional return 6-14 
operation 6-18 
parameters 6-14 
syntax 6-14 
PORTMASK 2-8 
PREAD 6-2, 6-4, 6-20 
and ACCEPT 6-6, 6-7 
and GET 6-8 
condition codes 6-20 
functional return 6-20 
operation 6-21 
parameters 6-20 
syntax 6-20 
Programmatic access 4-14 
example 4-15 
Program-to-program communications, see PTOP 
PTOP commands, comparison with MPE 6-4 
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PTOP intrinsics 6-5 
ACCEPT 6-6 
GET 6-8 
PCHECK 6-10 
PCLOSE 6-11 
PCONTROL 6-12 
POPEN 6-14 
PREAD 6-20 
PWRITE 6-22 
REJECT 6-24 

PTOP 1-1, 6-1, 8-1 
advantages of 8-1 
and SPL 6-5 
example 6-25 
interfacing with BASIC and COBOL 6-25 
master intrinsics 6-2 
slave intrinsics 6-3 

PWRITE 6-2, 6-4, 6-22 
and ACCEPT 6-6, 6-7 
and GET 6-8 
condition codes 6-22 
operation 6-22 
parameters 6-22 
syntax 6-22 


Q 


Quiet 2-18 5-8 
QUERY 5-15 


R 


RDBA 1-1, 5-1 
through a local application program 5-1 
using a data base-access file 5-5 
using a DBA file 5-5 
using the command intrinsic 5-3 
with multiple data bases 5-3 
RECEIVEMAIL 6-4 
REJECT 6-3, 6-4, 6-24 
condition codes 6-24 
operation 6-24 
parameters 6-24 
syntax 6-24 
REMOTE 3-2 
Remote commands, issuing 3-1 
Remote Command Execution 1-1 
Remote Data Base Access 1-1, 5-1 
Remote File Access 1-1, 4-1, 8-1 
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Remote Hello 2-29 

for opening a line 2-31 

parameters 2-30 

syntax 2-29 
Remote ID sequence 2-19, 5-8 
Remote mode, entering 3-6 
Remote off-line listing 4-3 
Remote programs and local data 4-12 
Remote sessions 3-1 

and BREAK 3-4 

and CONTROL keys 3-6 
RFA 4-1, 8-1 


S 


Sample I/O device table, INP dialup 2-14 
Sample I/O device tables 2-8 

HSI hardwired 2-8 

INP hardwired 2-10 

SSLC dialup 2-12 
Selection signal sequence 2-19 
SENDMAIL 6-4 
Sessionname 2-29, 2-30 
Single system/distributed system comparison 6-4 
Slave PTOP intrinsics 6-3 
Specifying a DS line 2-8 
Specifying an X.25 line 2-16 
SPL 

and DSCOPY intrinsic 7-12 

and DSCOPYMSG intrinsic 7-15 

and PTOP 6-5 
SSLC 2-2, 2-5, 2-8, 2-18 

dialup sample I/O device table 2-12 
Synchronous Single-Line Controller, see SSLC 
SYSDUMP, and compression 8-10 
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T 


Telephone line 2-19 
opening 2-5 
Telephone number 2-19, 5-8 
TERMINATE 6-4 
Terminating remote session 3-7 
from local session 3~-7 
from remote session 3-8 
Termtype 2-29, 2-30 
Time 5-9 
Transmission between systems 8-2 


U 


User identification 5-11 
Using remote subsystem from batch job 3-4 


V 


Virtual terminal 1-1, 2-8 


X 


X.21 messages A-11 

call progress signals A-11 

DCE provided information A-12 
X.25 2-17, 2-31 
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roduct Line Sales/Support Key 


»y Product Line 
Analytical 
M Components 
Computer Systems Sales only 
H Computer Systems Hardware Sales and Services 
S Computer Systems Software Sales and Services 
Electronic Instruments & Measurement Systems 


Medical Products 

P Medical Products Primary SRO 

S Medical Products Secondary SRO 
Personal Computation Products 
Sales only for specific product line 


Support only for specific product line 


APORTANT: These symbols designate general product line capability. They do not 
isure sales or support availability for all products within a line, at all locations. 
‘ontact your local sales office for information regarding locations where HP support 


; available for specific products. 
IP distributors are printed in italics. 


1EADQUARTERS OFFICES 


‘there is no sales office listed for your area, contact one of these 


ieadquarters offices. 


YORTH/CENTRAL AFRICA 
jewlett-Packard S.A. 

’ Rue du Bois-du-Lan 

3H-1217 MEYRIN 2, Switzerland 

Fel: (022) 83 12 12 

relex: 27835 hpse 

Sable: HEWPACKSA Geneve 


ASIA 

dewlett-Packard Asia Ltd. 

3th Floor, Sun Hung Kai Centre 
30 Harbour Rd. 

3.P.0. Box 795 

HONG KONG 

Tel: 5-832 3211 

After Jan. 1, 1984 

47th Floor, China Resources Bldg. 
26 Harbour Rd., Wanchai 
HONG KONG 

Telex: 66678 HEWPA HX 
Cable: HEWPACK HONG KONG 


CANADA 

Hewlett-Packard (Canada) Ltd. 
6877 Goreway Drive 
MISSISSAUGA, Ontario L4V 1M8 
Tel: (416) 678-9430 

Telex: 610-492-4246 


EASTERN EUROPE 
Hewlett-Packard Ges.m.b.h. 
Lieblgasse 1 

P.0.Box 72 

A-1222 VIENNA, Austria 

Tel: (222) 2365110 

Telex: 13 4425 HEPA A 


NORTHERN EUROPE 
Hewlett-Packard S.A. 
Uilenstede 475 

P.O.Box 999 

NL-1180 AZ AMSTELVEEN 
The Netherlands 

Tel: 20 437771 


SOUTH EAST EUROPE 
Hewlett-Packard S.A. 

7, Rue du Bois-du-Lan 
CH-1217 MEYRIN 2, Switzerland 
Tel: (022) 83 12 12 

Telex: 27835 hpse 

Cable: HEWPACKSA Geneve 


OTHER EUROPE 
Hewlett-Packard S.A. 

P.O. Box 

150, Rte du Nant-D’Avril 
CH-1217 MEYRIN 2, Switzerland 
Tel: (022) 83 8111 

Telex: 22486 hpsa 

Cable: HEWPACKSA Geneve 


MEDITERRANEAN AND 
MIDDLE EAST 
Hewlett-Packard S.A. 
Mediterranean and Middle East 
Operations 

Atrina Centre 

32 Kifissias Ave. 
Paradissos-Amarousion, ATHENS 
Greece 

Tel: 682 88 11 

Telex: 21-6588 HPAT GR 
Cable: HEWPACKSA Athens 


EASTERN USA 
Hewlett-Packard Co. 
4 Choke Cherry Road 
ROCKVILLE, MD 20850 
Tel: (301) 258-2000 


MIDWESTERN USA 
Hewlett-Packard Co. 

5201 Tollview Drive 

ROLLING MEADOWS, IL 60008 
Tel: (312) 255-9800 


SOUTHERN USA 
Hewlett-Packard Co. 
2000 South Park Place 
P.O. Box 105005 
ATLANTA, GA 30348 
Tel: (404) 955-1500 


WESTERN USA 
Hewlett-Packard Co. 
3939 Lankershim Blvd. 
P.0. Box 3919 

LOS ANGELES, CA 91604 
Tel: (213) 506-3700 


OTHER INTERNATIONAL 
AREAS 

Hewlett-Packard Co. 
Intercontinental Headquarters 
3495 Deer Creek Road 

PALO ALTO, CA 94304 

Tel: (415) 857-1501 

Telex: 034-8300: 

Cable: HEWPACK 


SALES & SUPPORT OFFICES 


Arranged alphabetically by country 


ANGOLA 

Telectra 

Empresa Técnica de Equipamentos 
R. Barbosa Rodrigues, 41-1 DT. 
Caixa Postal 6487 

LUANDA 

Tel: 355 15,355 16 

EP 


ARGENTINA 
Hewlett-Packard Argentina S.A. 
Avenida Santa Fe 2035 
Martinez 1640 BUENOS AIRES 
Tel: 798-5735, 792-1293 
Telex: 17595 BIONAR 

Cable: HEWPACKARG 
A,E,CH,CS,P 

Biotron S.A.C.LM. e 1. 

Av Paseo Colon 221, Piso 9 
1399 BUENOS AIRES 

Tel: 30-4846, 30-1851 
Telex: 17595 BIONAR 

M 


AUSTRALIA 


Adelaide, South Australia 
Office 

Hewlett-Packard Australia Lid. 
153 Greenhill Road 

PARKSIDE, S.A. 5063 

Tel: 272-5911 

Telex: 82536 

Cable: HEWPARD Adelaide 

A* ,CH,CM,,E,MS,P 


Brisbane, Queensland Office 
Hewlett-Packard Australia Ltd. 

10 Payne Road 

THE GAP, Queensland 4061 

Tel: 30-4133 

Telex: 42133 

Cable: HEWPARD Brisbane 
A,CH,CM,E,M,P 


Canberra, Australia 
Capital Territory 
Office 

Hewlett-Packard Australia Ltd. 
121 Wollongong Street 
FYSHWICK, A.C.T. 2609 

Tel: 80 4244 

Telex: 62650 

Cable: HEWPARD Canberra 
CH,CM,E,P 


Melbourne, Victoria Office 
Hewlett-Packard Australia Ltd. 
31-41 Joseph Street 

BLACKBURN, Victoria 3130 

Tel: 895-2895 

Telex: 31-024 

Cable: HEWPARD Melbourne 
A,CH,CM,CS,E,MS,P 


Perth, Western Australia 
Office 

Hewlett-Packard Australia Ltd. 
261 Stirling Highway 
CLAREMONT, W.A. 6010 

Tel: 383-2188 

Telex: 93859 

Cable: HEWPARD Perth 
A,CH,CM,E,MS,P 


(4) 
Sydney, New South Wales 
Office 

Hewlett-Packard Australia Ltd. 
17-23 Talavera Road 

P.O. Box 308 

NORTH RYDE, N.S.W. 2113 

Tel: 887-1611 

Telex: 21561 

Cable: HEWPARD Sydney 
A,CH,CM,CS,E,MS,P 


AUSTRIA 
Hewlett-Packard Ges.m.b.h. 
Grottenhofstrasse 94 
A-8052 GRAZ 

Tel: (0316) 291 5 66 
Telex: 32375 

CH,E 

Hewlett-Packard Ges.m.b.h. 
Lieblgasse 1 

P.O. Box 72 

A-1222 VIENNA 

Tel: (0222) 23 65 11-0 
Telex: 134425 HEPA A 
A,CH,CM,CS,E,MS,P 


BAHRAIN 

Green Salon 

P.O. Box 557 
Manama 

BAHRAIN 

Tel: 255503-255950 
Telex: 84419 

P 

Wael Pharmacy 

P.O. Box 648 
BAHRAIN 

Tel: 256123 

Telex: 8550 WAEL BN 
E,C,M 


BELGIUM 

Hewlett-Packard Belgium S.A./N.V. 
Blvd de la Woluwe, 100 
Woluwedal 

B- 1200 BRUSSELS 

Tel: (02) 762-32-00 

Telex: 23-494 paloben bru 
A,CH,CM,CS,E,MP,P 


BRAZIL 

Hewlett-Packard do Brasil |.e.C. Ltda. 
Alameda Rio Negro, 750 

Alphaville 

06400 BARUERI SP 

Tel: (011) 421.1311 

Telex: (011) 33872 HPBR-BR 

Cable: HEWPACK Sao Paulo 
A,CH,CM,CS,E,M,P 

Hewlett-Packard do Brasil I.e.C. Ltda. 
Avenida Epitacio Pessoa, 4664 
2247 1 RIO DE JANEIRO-RJ 

Tel: (02I) 286.0237 

Telex: 021-21905 HPBR-BR 

Cable: HEWPACK Rio de Janeiro 
A,CH,CM,E,MS,P* 

ANAMED 1.C.E.1. Lida. 

Rua Bage, 103 


' 04012 SAO PAULO 


Tel: (011) 570-5726 
Telex: 021-21905 HPBR-BR 
M 


SALES & SUPPORT OFFICES 


Arranged alphabetically by country 


CANADA 


Alberta 

Hewlett-Packard (Canada) Ltd. 
3030 3rd Avenue N.E. 
CALGARY, Alberta T2A 617 
Tel: (403) 235-3100 
A,CH,CM,E*,MS,P* 
Hewlett-Packard (Canada) Ltd. 
11120A-178th Street 
EDMONTON, Alberta T5S 1P2 
Tel: (403) 486-6666 
A,CH,CM,CS,E,MS,P 


British Columbia 
Hewlett-Packard (Canada) Ltd. 
10691 Shellbridge Way 
RICHMOND, 

British Columbia V6X 2W7 
Tel: (604) 270-2277 

Telex: 610-922-5059 
A,CH,CM,CS,E* ,MS,P* 


Manitoba 

Hewlett-Packard (Canada) Ltd. 
380-550 Century Street 
WINNIPEG, Manitoba R3H OY 1 
Tel: (204) 786-6701 
A,CH,CM,E,MS,P* 


Nova Scotia 

Hewlett-Packard (Canada) Ltd. 
P.O. Box 931 

900 Windmill Road 

DARTMOUTH, Nova Scotia B2Y 326 
Tel: (902) 469-7820 
CH,CM,CS,E*,MS,P* 


Ontario 

Hewlett-Packard (Canada) Ltd. 
3325 N. Service Rd., Unit 6 
BURLINGTON, Ontario P3A 2A3 
Tel: (416) 335-8644 

CS,M* 

Hewlett-Packard (Canada) Ltd. 
552 Newbold Street 

LONDON, Ontario N6E 2S5 
Tel: (519) 686-9181 
A,CH,CM,E*,MS,P* 
Hewlett-Packard (Canada) Ltd. 
6877 Goreway Drive 
MISSISSAUGA, Ontario L4V 1M8 
Tel: (416) 678-9430 
A,CH,CM,CS,E,MP,P 
Hewlett-Packard (Canada) Ltd. 
2670 Queensview Dr. 
OTTAWA, Ontario K2B 8K1 
Tel: (613) 820-6483 
A,CH,CM,CS,E*,MS,P* 
Hewlett-Packard (Canada) Ltd. 
220 Yorkiand Blvd., Unit #11 
WILLOWDALE, Ontario M2J 1R5 
Tel: (416) 499-9333 

CH 


Quebec 

Hewlett-Packard (Canada) Ltd. 
17500 South Service Road 
Trans-Canada Highway 
KIRKLAND, Quebec H9J 2M5 
Tel: (514) 697-4232 
A,CH,CM,CS,E,MP,P* 
Hewlett-Packard (Canada) Ltd. 
Les Galeries du Vallon 

2323 Du Versont Nord 

STE. FOY, Quebec G1N 4C2 
Tel: (418) 687-4570 

CH 


CHILE 

Jorge Calcagni y Cia. Lida. 
Av. Italia 634 Santiago 
Casilla 16475 

SANTIAGO 9 

Tel: 222-0222 

Telex: Public Booth 440001 
A,CM,E,.M 

Olympia (Chile) Ltda. 

Av. Rodrigo de Araya 1045 
Casilla 256-V 

SANTIAGO 21 

Tel: (02) 22 55 044 

Telex: 240-565 OLYMP CL 
Cable: Olympiachile Santiagochile 
CH,CS,P 


CHINA, People’s Republic of 
China Hewlett-Packard Rep. Oftice 
P.O. Box 418 

1A Lane 2, Luchang St. 

Beiwei Rd., Xuanwu District 

BEIJING 

Tel: 33-1947, 33-7426 

Telex: 22601 CTSHP CN 

Cable: 1920 

A,CH,CM,CS,E,P 


COLOMBIA 
Instrumentaci6n 

H. A. Langebaek & Kier S.A. 
Carrera 4A No. 52A-26 
Apartado Aereo 6287 
BOGOTA 1, DE. 

Tel: 212-1466 

Telex: 44400 INST CO 
Cable: AARIS Bogota 
CM,E,M 

Casa Humbolat Ltda. 
Carrera 14, No. 98-60 
Apartado Aereo 51283 
BOGOTA 1, DE. 

Tel: 256-1686 

Telex: 45403 CCAL CO. 
A 


COSTA RICA 

Cientifica Costarricense S.A. 
Avenida 2, Calle § 

San Pedro de Montes de Oca 
Apartado 10159 

SAN JOSE 

Tel: 24-38-20, 24-08-19 
Telex: 2367 GALGUR CR 
CME,M 


CYPRUS 

Telerexa Ltd. 

P.0. Box 4809 

14C Stassinos Avenue 
NICOSIA 

Tel: 62698 

Telex: 2894 LEVIDO CY 
EMP 


DENMARK 
Hewlett-Packard A/S 
Datavej 52 

DK-3460 BIRKEROD 
Tel: (02) 81-66-40 
Telex: 37409 hpas dk 
A,CH,CM,CS,E,MS,P 
Hewlett-Packard A/S 
Rolighedsvej 32 
DK-8240 RISSKOV, Aarhus 
Tel: (06) 17-60-00 
Telex: 37409 hpas dk 
CH,E 


DOMINICAN REPUBLIC 
Microprog S.A. 

Juan Tomas Mejia y Cotes No. 60 
Arroyo Hondo 

SANTO DOMINGO 

Tel: 565-6268 

Telex: 4510 ARENTA DR (RCA) P 


ECUADOR 

CYEDE Cia. Ltda. 
Avenida Eloy Alfaro 1749 
Casilla 6423 CCI 

Quiro 

Tel: 450-975, 243-052 
Telex: 2548 CYEDE ED 
CM,E,P 

Hospitalar S.A. 

Robles 625 

Casilla 3590 

QuiTro 

Tel: 545-250, 545-122 
Telex: 2485 HOSPTL ED 
Cable: HOSPITALAR-Quito 
M 


EGYPT 

International Engineering Associates 
24 Hussein Hegazi Street 
Kasr-el-Aini 

CAIRO 

Tel: 23829, 21641 
Telex: IEA UN 93830 
CH,CS,E,M 

EGYPOR 

P.0.Box 2558 

42 El Zahraa Street 
CAIRO, Egypt 

Tel: 65 00 21 

Telex: 93 337 

P 


EL SALVADOR 
IPESA de El Salvador S.A. 
29 Avenida Norte 1216 
SAN SALVADOR 

Tel: 26-6858, 26-6868 
Telex: 20539 IPESASAL 
A,CH,CM,CS,E,P 


FINLAND 
Hewlett-Packard Oy 
Revontulentie 7 

PL 24 

SF-02101 ESPOO 10 
Tel: (90) 4550211 
Telex: 121563 hewpa sf 
CH,CM,CS,P 
Hewlett-Packard Oy 
(Olarinluoma 7) 

PL 24 

02101 ESPOO 10 
Tel: (90) 4521022 
A,E,MS 
Hewlett-Packard Oy 
Aatoksenkatv 10-C 
SF-40720-72 JYVASKYLA 
Tel: (941) 216318 
CH 

Hewlett-Packard Oy 
Kainvuntie 1-C 
SF-90140-14 OULU 
Tel: (981) 338785 
CH 


FRANCE 
Hewlett-Packard France 
Z.|. Mercure B 

Rue Berthelot 

F-13763 Les Milles Cedex 
AIX-EN-PROVENCE 

Tel: 16 (42) 59-41-02 
Telex: 410770F 
A,CH,E,MS,P* 
Hewlett-Packard France 
64, rue Marchand Saillant 
F-61000 ALENCON 

Tel: 16 (33) 29 04 42 


Hewlett-Packard France 
Boite Postale 503 
F-25026 BESANCON 

28 rue de la Republique 
F-25000 BESANCON 
Tel: 16 (81) 83-16-22 
CH,M 

Hewlett-Packard France 
13, Place Napoleon Ill 
F-29000 BREST 

Tel: 16 (98) 03-38-35 
Hewlett-Packard France 
Chemin des Mouilles 
Boite Postale 162 
F-69130 ECULLY Cedex (Lyon) 
Tel: 16 (78) 833-81-25 
Telex: 3106 17F 
A,CH,CS,E,MP 
Hewlett-Packard France 
Tour Lorraine 
Boulevard de France 
F-91035 EVRY Cedex 
Tel: 16 6 077-96-60 
Telex: 6923 15F 

E 


Hewlett-Packard France 

Parc d’Activite du Bois Briard 
Ave. du Lac 

F-91040 EVRY Cedex 

Tel: 16 6 077-8383 

Telex: 6923 15F 

E 


Hewlett-Packard France 

5, avenue Raymond Chanas 
F-38320 EYBENS (Grenoble) 

Tel: 16 (76) 25-81-41 

Telex: 980124 HP GRENOB EYBE 
CH 


Hewlett-Packard France 
Centre d’Affaire Paris-Nord 
Batiment Ampére 5 étage 
Rue de la Commune de Paris 
Boite Postale 300 

F-93153 LE BLANC MESNIL 
Tel: 16 (1) 865-44-52 
Telex: 211032F 

CH,CS,E,MS 


Hewlett-Packard France 

Parc d’Activités Cadera 
Quartier Jean Mermoz 

Avenue du Président JF Kennedy 
F-33700 MERIGNAC (Bordeaux) 
Tel: 16 (56) 34-00-84 

Telex: 550105F 

CH,E,MS 

Hewlett-Packard France 
Immueble “Les 3 B” 

Nouveau Chemin de la Garde 
ZAC de Bois Briand 

F-44085 NANTES Cedex 

Tel: 16 (40) 50-32-22 

CH* * 


*RANCE (Cont'd) 
lewlett-Packard France 

25, rue du Faubourg Bannier 
-45000 ORLEANS 

‘el: 16 (38) 68 01 63 


lewlett-Packard France 

‘one Industrielle de Courtaboeuf 
\venue des Tropiques 
'.91947 Les Ulis Cedex ORSAY 
rel: (6) 907-78-25 

felex: 600048F 
\,CH,CM,CS,E,MP,P 
Jewlett-Packard France 
2aris Porte-Maillot 

15, Avenue de L’Amiral Bruix 
=.75782 PARIS CEDEX 16 
Tel: 16 (1) 502-12-20 

Telex: 613663F 

OH,MS,P 

Hewlett-Packard France 

124, Boulevard Tourasse 
F-64000 PAU 

Tel: 16 (59) 80 38 02 
Hewlett-Packard France 

2 Allée de la Bourgonnette 
F-35100 RENNES 

Tel: 16 (99) 51-42-44 
Telex: 7409 12F 
CH,CM,E,MS,P* 
Hewlett-Packard France 

98 Avenue de Bretagne 
F-76100 ROUEN 

Tel: 16 (35) 63-57-66 
CH**,cS 

Hewlett-Packard France 

4 Rue Thomas Mann 

Boite Postale 56 

F-67033 STRASBOURG Cedex 
Tel: 16 (88) 28-56-46 
Telex: 89014 1F 

CH,E,MS,P* 

Hewlett-Packard France 

Le Péripole 

20, Chemin du Pigeonnier de la 
Cépiére 

F-31083 TOULOUSE Cedex 
Tel: 16 (61) 40-11-12 
Telex: 531639F 
A,CH,CS,E,P* 
Hewlett-Packard France 

9, rue Baudin 

F-26000 VALENCE 

Tel: 16 (75) 42 76 16 


Hewlett-Packard France 
Carolor 

ZAC de Bois Briand 
F-57640 ViIGY (Metz) 
Tel: 16 (8) 771 20 22 
CH 

Hewlett-Packard France 
Immeuble Péricentre 
F-59658 VILLENEUVE D’ASCQ Cedex 
Tel: 16 (20) 91-41-25 
Telex: 160124F 
CH,E,MS,P* 


GERMAN FEDERAL 
REPUBLIC 
Hewlett-Packard GmbH 
Geschdaftsstelle 
Keithstrasse 2-4 

D-1000 BERLIN 30 

Tel: (030) 24-90-86 
Telex: 018 3405 hpbin d 
A,CH,E,M,P 


Hewlett-Packard GmbH 
Geschiftsstelle 
Herrenberger Strasse 130 
D-7030 BOBLINGEN 

Tel: (7031) 14-0 

Telex: 

A,CH,CM,CS,E,MP,P 
Hewlett-Packard GmbH 
Geschéftsstelle 
Emanuel-Leutze-Strasse 1 
D-4000 DUSSELDORF 

Tel: (0211) 5971-1 

Telex: 085/86 533 hpdd d 
A,CH,CS,E,MS,P 
Hewlett-Packard GmbH 
Geschaftsstelle 

Schleefstr. 28a 

D-4600 DORTMUND-Aplerbeck 
Tel: (0231) 45001 


Hewlett-Packard GmbH 
Vertriebszentrale Frankfurt 
Berner Strasse 117 
Postfach 560 140 
D-6000 FRANKFURT 56 
Tel: (0611) 50-04-1 
Telex: 04 13249 hpffm d 
A,CH,CM,CS,E,MP,P 
Hewlett-Packard GmbH 
Geschiaftsstelle 
Aussenstelle Bad Homburg 
Louisenstrasse 115 
D-6380 BAD HOMBURG 
Tel: (06172) 109-0 
Hewlett-Packard GmbH 
Geschiaftsstelle 
Kapstadtring 5 

D-2000 HAMBURG 60 
Tel: (040) 63804-1 
Telex: 021 63 032 hphh d 
A,CH,CS,E,MS,P 
Hewlett-Packard GmbH 
Geschaftsstelle 
Heidering 37-39 
D-3000 HANNOVER 61 
Tel: (0511) 5706-0 
Telex: 092 3259 
A,CH,CM,E,MS,P 
Hewlett-Packard GmbH 
Geschaftsstelle 
Rosslauer Weg 2-4 
D-6800 MANNHEIM 

Tel: (0621) 70050 
Telex: 0462105 

A,C,E 

Hewlett-Packard GmbH 
Geschiftsstelle 
Messerschmittstrasse 7 
D-7910 NEU ULM 

Tel: 0731-70241 
Telex: 0712816 HP ULM-D 
A,C,E* 

Hewlett-Packard GmbH 
Geschaftsstelle 
Ehhericherstr. 13 
D-8500 NURNBERG 10 
Tel: (0911) 5205-0 
Telex: 0623 860 
CH,CM,E,MS,P 
Hewlett-Packard GmbH 
Geschaftsstelle 
Eschenstrasse 5 
D-8028 TAUFKIRCHEN 
Tel: (089) 6117-1 
Telex: 0524985 
A,CH,CM,E,MS,P 


SALES & SUPPORT OFFICES [3] 


Arranged alphabetically by country OD 


GREAT BRITAIN 
See United Kingdom 


GREECE 

Kostas Karaynnis S.A. 

8 Omirou Street 

ATHENS 133 

Tel: 32 30 303, 32 37 371 
Telex: 215962 RKAR GR 
A,CH,CM,CS,E,M,P 

PLAISIO S.A. 

G. Gerardos 

24 Stournara Street 
ATHENS 

Tel: 36-11-160 

Telex: 221871 

P 


GUATEMALA 

IPESA 

Avenida Reforma 3-48, Zona 9 
GUATEMALA CITY 

Tel: 316627, 314786 

Telex: 4192 TELTRO GU 
A,CH,CM,CS,E,M,P 


HONG KONG 
Hewlett-Packard Hong Kong, Ltd. 
G.P.0. Box 795 

5th Floor, Sun Hung Kai Centre 
30 Harbour Road 

HONG KONG 

Tel: 5-8323211 

Telex: 66678 HEWPA HX 
Cable: HEWPACK HONG KONG 
E,CH,CS,P 

CET Lid. 

1402 Tung Wah Mansion 
199-203 Hennessy Rd. 
Wanchia, HONG KONG 

Tel: 5-729376 

Telex: 85148 CET HX 

CM 

Schmidt & Co. (Hong Kong) Ltd. 
Wing On Centre, 28th Floor 
Connaught Road, C. 

HONG KONG 

Tel: 5-455644 

Telex: 74766 SCHMX HX 

A,M 


ICELAND 

Elding Trading Company Inc. 
Hafnarnvoli-Tryggvagotu 
P.O. Box 895 

IS-REYKJAVIK 

Tel: 1-58-20, 1-63-03 

M 


INDIA 

Computer products are sold through 
Blue Star Ltd. All computer repairs and 
maintenance service is done through 
Computer Maintenance Corp. 


Blue Star Ltd. 

Sabri Complex Il Floor 
24 Residency Rd. 
BANGALORE 560 025 
Tel: 55660 

Telex: 0845-430 
Cable: BLUESTAR 
A,CH*,CM,CS"*,E 


Blue Star Ltd. 

Band Box House 
Prabhadevi 

BOMBAY 400 025 

Tel: 422-3101 

Telex: 011-3751 

Cable: BLUESTAR 

AM 

Blue Star Ltd. 

Sahas 

414/2 Vir Savarkar Marg 
Prabhadevi 

BOMBAY 400 025 

Tel: 422-6155 

Telex: 011-4093 

Cable: FROSTBLUE 
A,CH*,CM,CS*,E,M 

Blue Star Lid. 

Kalyan, 19 Vishwas Colony 
Alkapuri, BORODA, 390 005 
Tel: 65235 

Cable: BLUE STAR 

A 


Blue Star Ltd. 

7 Hare Street 

CALCUTTA 700 001 

Tel: 12-01-31 

Telex: 021-7655 

Cable: BLUESTAR 

AM 

Blue Star Ltd. 

133 Kodambakkam High Road 
MADRAS 600 034 

Tel: 82057 

Telex: 041-379 

Cable: BLUESTAR 

A,M 

Blue Star Ltd. 

Bhandari House, 7th/8th Floors 
91 Nehru Place 

NEW DELHI 110 024 

Tel: 682547 

Telex: 031-2463 

Cable: BLUESTAR 
A,CH*,CM,CS*,E,M 

Blue Star Lid. 

15/16:C Wellesley Ra. 

PUNE 411 011 

Tel: 22775 

Cable: BLUE STAR . 
A 


Blue Star Lid. 
2-2-47/1108 Bolarum Rd. 
SECUNDERABAD 500 003 
Tel: 72057 

Telex: 0155-459 

Cable: BLUEFROST 

AE 

Blue Star Ltd. 

T.C. 7/603 Poornima 


_ Maruthankuzhi 


TRIVANDRUM 695 013 
Tel: 65799 

Telex: 0884-259 
Cable: BLUESTAR 
£ 


Computer Maintenance Corporation 
Ltd. 

115, Sarojini Devi Road 
SECUNDERABAD 500 003 

Tel: 310-184, 345-774 

Telex: 031-2960 

CH ae 


{| 


@ 


SALES & SUPPORT OFFICES 


Arranged alphabetically by country 


INDONESIA 

BERCA Indonesia P.T. 
P.O.Box 496/Jkt. 

Jf, Abdul Muis 62 
JAKARTA 

Tel: 21-373009 

Telex: 46748 BERSAL IA 
Cable: BERSAL JAKARTA 
P 

BERCA Indonesia P.T. 
P.0.Box 2497/Jkt 

Antara Bldg., 17th Floor 
Jl, Medan Merdeka Selatan 17 
JAKARTA-PUSAT 

Tel: 21-344-181 

Telex: BERSAL IA 
A,CS,E.M 

BERCA Indonesia P.T. 
P.0. Box 174/SBY. 

Ji. Kutei No. 11 
SURABAYA 

Tel: 68172 

Telex: 31146 BERSAL SB 
Cable: BERSAL-SURABAYA 
A*,EMP 


IRAQ 

Hewlett-Packard Trading S.A. 
Service Operation 

Al Mansoor City 9B/3/7 
BAGHDAD 

Tel: 551-49-73 

Telex: 212-455 HEPAIRAQ IK 
CH,CS 


IRELAND 
Hewlett-Packard Ireland Ltd. 
82/83 Lower Leeson Street 
DUBLIN 2 

Tel: 0001 608800 

Telex: 30439 
A,CH,CM,CS,E,M,P 

Cardiac Services Ltd. 
Kilmore Road 

Artane 

DUBLIN 5 

Tel: (01) 351820 

Telex: 30439 

M 


ISRAEL 

Eldan Electronic Instrument Ltd. 
P.0.Box 1270 

JERUSALEM 91000 

16, Ohaliav St. 

JERUSALEM 94467 

Tel: 533 221, 553 242 

Telex: 25231 AB/PAKRD IL 

A 


Electronics Engineering Division 
Motorola Israel Ltd. 

16 Kremenetski Street 

P.O. Box 25016 

TEL-AVIV 67899 

Tel: 3 88 388 

Telex: 33569 Motil iL 

Cable: BASTEL Tel-Aviv 
CH,CM,CS,E,MP 


ITALY 

Hewlett-Packard Italiana S.p.A 
Traversa 99C 

Via Giulio Petroni, 19 

|-70124 BARI 

Tel: (080) 41-07-44 

M 


Hewlett-Packard Italiana S.p.A. 
Via Martin Luther King, 38/I 
1-40 132 BOLOGNA 

Tel: (051) 402394 

Telex: 511630 

CH,E,MS 

Hewlett-Packard Italiana S.p.A. 
Via Principe Nicola 43G/C 
1-95126 CATANIA 

Tel: (095) 37-10-87 

Telex: 970291 

C,P 

Hewlett-Packard Italiana S.p.A. 
Via G. Di Vittorio 9 


1-20063 CERNUSCO SUL NAVIGLIO. 


(Milano) 

Tel: (02) 923691 

Telex: 334632 
A,CH,CM,CS,E,MP,P 
Hewlett-Packard Italiana S.p.A. 
Via C. Colombo 49 

|-20090 TREZZANO SUL NAVIGLIO 
(Milano) 

Tel: (02) 4459041 

Telex: 322116 

C,M 

Hewlett-Packard Italiana S.p.A. 
Via Nuova San Rocco a 
Capodimonte, 62/A 

!-80131 NAPOLI 

Tel: (081) 7413544 

Telex: 710698 

A,CH,E 

Hewlett-Packard Italiana S.p.A. 
Viale G. Modugno 33 

1-16156 GENOVA PEGLI 

Tel: (010) 68-37-07 

Telex: 215238 

E,C 

Hewlett-Packard Italiana S.p.A. 
Via Pelizzo 15 

1-35128 PADOVA 

Tel: (049) 664888 

Telex: 430315 

A,CH,E,MS 

Hewlett-Packard Italiana S.p.A. 
Viale C. Pavese 340 

1-00144 ROMA EUR 

Tel: (06) 54831 

Telex: 610514 
A,CH,CM,CS,E,MS,P* 
Hewlett-Packard Italiana S.p.A. 
Via di Casellina 57/C 

1-500 18 SCANDICCI-FIRENZE 
Tel: (055) 753863 
Hewlett-Packard Italiana S.p.A. 
Corso Svizzera, 185 

I-10 144 TORINO 

Tel: (011) 74 4044 

Telex: 221079 

CHE * 


JAPAN 
Yokogawa-Hewlett-Packard Ltd. 
152-1, Onna 

ATSUGI, Kanagawa, 243 

Tel: (0462) 28-0451 

CN,C*,E 
Yokogawa-Helwett-Packard Ltd. 
Meijji-Seimei Bldg. 6F 

3-1 Hon Chiba-Cho 

CHIBA, 280 

Tel: 472 25 7701 

E,CH,CS 


Yokogawa-Hewlett-Packard Ltd. 
Yasuda-Seimei Hiroshima Bidg. 
6-11, Hon-dori, Naka-ku 
HIROSHIMA, 730 

Tel: 82-24 1-0611 


Yokogawa-Hewlett-Packard Ltd. 
Towa Building 

2-3, Kaigan-dori, 2 Chome Chuo-ku 
KOBE, 650 

Tel: (078) 392-4791 
Yokogawa-Hewlett-Packard Ltd. 
Kumagaya Asahi 82 Bldg 

3-4 Tsukuba 

KUMAGAYA, Saitama 360 

Tel: (0485) 24-6563 

CH,CM,E 
Yokogawa-Hewlett-Packard Ltd. 
Asahi Shinbun Daiichi Seimei Bldg. 
4-7, Hanabata-cho 
KUMAMOTO,860 

Tel: (0963) 54-7311 

CH,E 
Yokogawa-Hewlett-Packard Ltd. 
Shin-Kyoto Center Bldg. 

614, Higashi-Shiokoji-cho 
Karasuma-Nishiiru 

Shiokoji-dori, Shimogyo-ku 
KYOTO, 600 

Tel: 075-343-0921 

CH,E 
Yokogawa-Hewlett-Packard Ltd. 
Mito Mitsui Bldg 

4-73, Sanno-maru, 1 Chome 
MITO, Ibaraki 310 

Tel: (0292) 25-7470 

CH,CM,E 
Yokogawa-Hewlett-Packard Ltd. 
Sumitomo Seimei 14-9 Bidg. 
Meieki-Minami, 2 Chome 
Nakamura-ku 

NAGOYA, 450 

Tel: (052) 571-5171 
CH,CM,CS,E,MS 
Yokogawa-Hewlett-Packard Ltd. 
Chuo Bidg., 

4-20 Nishinakajima, 5 Chome 
Yodogawa-ku 

OSAKA, 532 

Tel: (06) 304-6021 

Telex: YHPOSA 523-3624 
A,CH,CM,CS,E,MP,P* 
Yokogawa-Hewlett-Packard Ltd. 
27-15, Yabe, 1 Chome 
SAGAMIHARA Kanagawa, 229 
Tel: 0427 59-1311 


Yokogawa-Hewlett-Packard Ltd. 
Daiichi Seimei Bldg. 

7-1, Nishi Shinjuku, 2 Chome 
Shinjuku-ku, TOKYO 160 

Tel: 03-348-46 11 

CH,E 
Yokogawa-Hewlett-Packard Ltd. 
29-21 Takaido-Higashi, 3 Chome 
Suginami-ku TOKYO 168 

Tel: (03) 331-611 

Telex: 232-2024 YHPTOK 
A,CH,CM,CS,E,MP,P* 
Yokogawa-Hewlett-Packard Ltd. 
Daiichi Asano Building 

2-8, Odori, 5 Chome 
UTSUNOMIYA, Tochigi 320 

Tel: (0286) 25-7 155 

CH,CS,E 


Yokogawa-Hewlett-Packard Ltd. 
Yasuda Seimei Nishiguchi Bldg. 
30-4 Tsuruya-cho, 3 Chome 
YOKOHAMA 221 

Tel: (045) 312-1252 

CH,CM,E 


JORDAN 

Mouasher Cousins Company 
P.O. Box 1387 

AMMAN 

Tel: 24907, 39907 

Telex: 21456 SABCO JO 
CHE,M,P 


KENYA 

ADCOM Lid., Inc., Kenya 
P.0.Box 30070 

NAIROBI 

Tel: 331955 

Telex: 22639 

EM 


KOREA 

Samsung Electronics HP Division 
12 Fi. Kinam Bldg. 

San 75-31, Yeoksam-Dong 
Kangnam-Ku 

Yeongdong P.O. Box 72 

SEOUL 

Tel: 555-7555, 555-5447 
Telex: K27364 SAMSAN 
A,CH,CM,CS,E,M,P 


KUWAIT 

Al-Khaldiya Trading & Contracting 
P.0. Box 830 Safat 
KUWAIT 

Tel: 42-4910, 41-1726 
Telex: 22481 Areeg kt 
CH,E,M 

Photo & Cine Equipment 
P.O. Box 270 Safat 
KUWAIT 

Tel: 42-2846, 42-3801 
Telex: 22247 Matin kt 

P 


LEBANON 
G.M. Dolmadjian 
Achratieh 

P.O. Box 165.167 
BEIRUT 

Tel: 290293 
MP** 

Computer Information Systems 
P.0. Box 11-6274 
BEIRUT 

Tel: 89 40 73 
Telex: 22259 

Cc 


LUXEMBOURG 
Hewlett-Packard Belgium S.A./N.V. 
Blvd de la Woluwe, 100 
Woluwedal 

B- 1200 BRUSSELS 

Tel: (02) 762-32-00 

Telex: 23-494 paloben bru 
A,CH,CM,CS,E,MP,P 


MALAYSIA 

Hewlett-Packard Sales (Malaysia) 
Sdn. Bhd. 

1st Floor, Bangunan British 
American 

Jalan Semantan, Damansara Heights 
KUALA LUMPUR 23-03 

Tel: 943022 

Telex: MA31011 

A,CH,E,M,P* 


IAYLAYSIA (Cont'd) 
otel Engineering 

0.Box 1917 

ot 6624, Section 64 

3/4 Pending Road 

uching, SARAWAK 

el: 36299 

elex: MA 70904 PROMAL 
able: PROTELENG 

EM 


AALTA 

hilip Toledo Ltd. 
lotabile Ra. 

IRIEHEL - 

el: 447 47, 455 66 
elex: Media MW 649 
'P 


AEXICO 

lewlett-Packard Mexicana, S.A. 
le C.V. 

wv. Periferico Sur No. 6501 
‘epepan, Xochimilco 

16020 MEXICO D.F. 

fel: 6-76-46-00 

felex: 17-74-507 HEWPACK MEX 
\,CH,CS,E,MS,P 
Jewlett-Packard Mexicana, S.A. 
Je C.V. 

Ave. Colonia del Valle 409 

3ol. del Valle 

Municipio de Garza Garcia 
WONTERREY, Nuevo Leon 

Tel: 78 42 41 

Telex: 038 410 

CH 

ECISA 

José Vasconcelos No. 218 
Col. Condesa Deleg. Cuauhtémoc 
MEXICO D.F. 06140 

Tel: 553-1206 

Telex: 17-72755 ECE ME 

M 


MOROCCO 
Dolbeau 

81 rue Karatchi 
CASABLANCA 

Tel: 304 1-82, 3068-38 
Telex: 23051, 22822 
E 


Gerep 

2 rue d’Agadir 

Boite Postale 156 
CASABLANCA 

Tel: 272093, 272095 
Telex: 23 739 

P 


NETHERLANDS 
Hewlett-Packard Nederland B.V. 
Van Heuven Goedhartiaan 121 
NL 1181KK AMSTELVEEN 

P.O. Box 667 

NL1180 AR AMSTELVEEN 

Tel: (020) 47-20-21 

Telex: 13 216 HEPA NL 
A,CH,CM,CS,E,MP,P 
Hewlett-Packard Nederland B.V. 
Bongerd 2 

NL 2906VK CAPELLE A/D IJSSEL 
P.O. Box 41 

NL 2900AA CAPELLE A/D IJSSEL 
Tel: (10) 51-64-44 

Telex: 21261 HEPAC NL 
A,CH,CS,E 


Hewlett-Packard Nederland B.V. 
Pastoor Petersstraat 134-136 
NL 5612 LV EINDHOVEN 

P.O. Box 2342 

NL 5600 CH EINDHOVEN 

Tel: (040) 326911 

Telex: 51484 hepae ni 
A,CH**,E,M 


NEW ZEALAND 
Hewlett-Packard (N.Z.) Ltd. 

5 Owens Road 

P.O. Box 26-189 

Epsom, AUCKLAND 

Tel: 687-159 

Cable: HEWPACK Auckland 
CH,CM,E,P* 

Hewlett-Packard (N.Z.) Ltd. 
4-12 Cruickshank Street 
Kilbirnie, WELLINGTON 3 

P.O. Box 9443 

Courtenay Place, WELLINGTON 3 
Tel: 877-199 

Cable: HEWPACK Wellington 
CH,CM,E,P 

Northrop Instruments & Systems Ltd. 
369 Khyber Pass Road 

P.O. Box 8602 

AUCKLAND 

Tel: 794-091 

Telex: 60605 

AM 

Northrop Instruments & Systems Ltd. 
110 Mandeville St. 

P.0. Box 8388 

CHRISTCHURCH 

Tel: 486-928 

Telex: 4203 

A.M 

Northrop Instruments & Systems Ltd. 
Sturdee House 

85-87 Ghuznee Street 

P.0. Box 2406 

WELLINGTON 

Tel: 850-091 

Telex: NZ 3380 

AM 


NORTHERN IRELAND 
See United Kingdom 


NORWAY 
Hewlett-Packard Norge A/S 
Folke Bernadottes vei 50 
P.O. Box 3558 

N-5033 FYLLINGSDALEN (Bergen) 
Tel: 0047/5/16 55 40 
Telex: 16621 hpnas n 
CH,CS,E,MS 
Hewlett-Packard Norge A/S 
Osterndalen 16-18 

P.O. Box 34 

N-1345 OSTERAS 

Tel: 0047/2/17 11 80 
Telex: 16621 hpnas n 
A,CH,CM,CS,E,M,P 


OMAN 

Khimjil Ramdas 

P.O. Box 19 

MUSCAT 

Tel: 722225, 745601 
Telex: 3289 BROKER MB MUSCAT 
P 

Suhail & Saud Bahwan 
P.0.Box 169 

MUSCAT 

Tel: 734 201-3 

Telex: 3274 BAHWAN MB 


SALES & SUPPORT OFFICES 


Arranged alphabetically by country 


PAKISTAN 

Mushko & Company Ltd. 
1-B, Street 43 

Sector F-8/1 

ISLAMABAD 

Tel: 51071 

Cable: FEMUS Rawalpindi 
AE,M 

Mushko & Company Ltd. 
Oosman Chambers 
Abdullah Haroon Road 
KARACHI 0302 

Tel: 524131, 524132 
Telex: 2894 MUSKO PK 
Cable: COOPERATOR Karachi 
AEMP* 


PANAMA 

Electr6nico Balboa, S.A. 
Calle Samuel Lewis, Ed. Alfa 
Apartado 4929 

PANAMA 5 

Tel: 63-6613, 63-6748 
Telex: 3483 ELECTRON PG 
A,CM,E,M,P 


PERU 

Cia Electro Médica S.A. 

Los Flamencos 145, San Isidro 
Casilla 1030 

LIMA 1 

Tel: 41-4325, 41-3703 

Telex: Pub. Booth 25306 
CM,E,M,P 


PHILIPPINES 

The Online Advanced Systems 
Corporation 

Rico House, Amorsolo Cor. Herrera 
Street 

Legaspi Village, Makati 

P.O. Box 1510 

Metro MANILA 

Tel: 85-35-81, 85-34-91, 85-32-21 
Telex: 3274 ONLINE 

A,CH,CS,E,M 

Electronic Specialists and Proponents 
Inc. 

690-B Epitanio de los Santos Avenue 
Cubao, QUEZON CITY 

P.0. Box 2649 Manila 

Tel: 98-96-81, 98-96-82, 98-96-83 
Telex: 40018, 42000 ITT GLOBE 
MACKAY BOOTH © 

P 


PORTUGAL 

Mundinter 

Intercambio Mundial de Comércio 
S.ARLL. 

P.O. Box 2761 

Av. Antonio Augusto de Aguiar 138 
P-LISBON 

Tel: (19) 53-21-31, 53-21-37 
Telex: 16691 munter p 

M 

Soquimica 

Av. da Liberdade, 220-2 

1298 LISBOA Codex 

Tel: 56 21 81/2/3 

Telex: 13316 SABASA 

P 

Telectra-Empresa Técnica de 
Equipmentos Eléctricos S.A.R.L. 
Rua Rodrigo da Fonseca 103 
P.0. Box 2531 

P-LISBON 1 

Tel: (19) 68-60-72 

Telex: 12598 

CH,CS,E,P 


Ls 
a 


PUERTO RICO 
Hewlett-Packard Puerto Rico 
Ave. Mufioz Rivera #101 
Esq. Calle Ochoa 

HATO REY, Puerto Rico 00918 
Tel: (809) 754-7800 


Hewlett-Packard Puerto Rico 
Calle 272 Edificio 203 

Urb. Country Club 

RIO PIEDRAS, Puerto Rico 

P.O. Box 4407 

CAROLINA, Puerto Rico 00628 
Tel: (809) 762-7255 

A,CH,CS 


QATAR 

Computearbia 

P.0. Box 2750 

DOHA 

Tel: 883555 

Telex: 4806 CHPARB 

P 

Eastern Technical Services 
P.0.Box 4747 

DOHA 

Tel: 329 993 

Telex: 4156 EASTEC DH 


Nasser Trading & Contracting 
P.0.Box 1563 

DOHA 

Tel: 22170, 23539 

Telex: 4439 NASSER DH 

M 


SAUDI ARABIA 

Modern Electronic Establishment 
Hewlett-Packard Division 

P.O. Box 22015 

Thuobah 

AL-KHOBAR 

Tel: 895-1760, 895-1764 
Telex: 671 106 HPMEEK SJ 
Cable: ELECTA AL-KHOBAR 
CH,CS,E,M 

Modern Electronic Establishment 
Hewlett-Packard Division 

P.O. Box 1228 

Redec Plaza, 6th Floor 

JEDDAH 

Tel: 644 38 48 

Telex: 4027 12 FARNAS SJ 
Cable: ELECTA JEDDAH 
CH,CS,E,M 

Modern Electronic Establishment 
Hewlett-Packard Division 
P.0.Box 22015 

RIYADH 

Tel: 491-97 15, 491-63 87 
Telex: 202049 MEERYD SJ 
CH,CS,E,M 

Abdul Ghani El Ajou 

P.O. Box 78 


- RIYADH 


Tel: 40 41717 
Telex: 200 932 EL AJOU 
P 


SCOTLAND 
See United Kingdom 


SINGAPORE 

Hewlett-Packard Singapore (Sales) 
Pte. Ltd. 

#08-00 Inchcape House 

450-2 Alexandra Road 

P.O. Box 58 Alexandra Rd. Post Office 
SINGAPORE, 9115 

Tel: 631788 

Telex: HPSGSO RS 34209 

Cable: HEWPACK, Singapore 
A,CH,CS,E,MS,P 


SALES & SUPPORT OFFICES 


Arranged alphabetically by country 


SINGAPORE (Cont’d) 
Dynamar International Ltd. 
Unit 05-11 Block 6 

Kolam Ayer Industrial Estate 
SINGAPORE 1334 

Tel: 747-6188 

Telex: RS 26283 

CM 


SOUTH AFRICA 


Hewlett-Packard So Africa (Pty.) Ltd. 


P.O. Box 120 

Howard Place CAPE PROVINCE 7450 
Pine Park Center, Forest Drive, 
Pinelands 

CAPE PROVINCE 7405 

Tel: 53-7954 

Telex: 57-20006 

A,CH,CM,E,MS,P 


Hewlett-Packard So Africa (Pty.) Ltd. 


P.O. Box 37099 

92 Overport Drive 

DURBAN 4067 

Tel: 28-4178, 28-4179, 28-4110 
Telex: 6-22954 

CH,CM 


Hewlett-Packard So Africa (Pty.) Ltd. 


6 Linton Arcade 

511 Cape Road 
Linton Grange 

PORT ELIZABETH 6000 
Tel: 041-302 148 

CH 


Hewlett-Packard So Africa (Pty.) Ltd. 


P.0.Box 33345 

Glenstantia 0010 TRANSVAAL 
1st Floor East 

Constantia Park Ridge Shopping 
Centre 

Constantia Park 

PRETORIA 

Tel: 982043 

Telex: 32163 

CH,E 


Hewlett-Packard So Africa (Pty.) Ltd. 


Private Bag Wendywood 
SANDTON 2144 

Tel: 802-5111, 802-5125 
Telex: 4-20877 

Cable: HEWPACK Johannesburg 
A,CH,CM,CS,E,MS,P 


SPAIN 

Hewlett-Packard Espafiola S.A. 
Calle Entenza, 321 
E-BARCELONA 29 

Tel: 8322.24.51, 321.73.54 
Telex: 52603 hpbee 
A,CH,CS,E,MS,P 
Hewlett-Packard Espafiola S.A. 
Calle San Vicente S/No 

Edificio Albia II 

E-BILBAO 1 

Tel: 423.83.06 

A,CH,E,MS 

Hewlett-Packard Espafiola S.A. 
Crta. de la Corufia, Km. 16, 400 
Las Rozas 

E-MADRID 

Tel: (1) 637.00. 11 

CH,CS,M 

Hewlett-Packard Espafiola S.A. 
Avda. S. Francisco Javier, S/no 
Planta 10. Edificio Sevilla 2, 
E-SEVILLA 5 

Tel: 64.44.54 

Telex: 72933 

A,CS,MS,P 


Hewlett-Packard Espafiola S.A. 
Calle Ramon Gordillo, 1 (Entlo.3) 
E-VALENCIA 10 

Tel: 361-1354 

CH,P 


SWEDEN 

Hewlett-Packard Sverige AB 
Sunnanvagen 14K 

S-22226 LUND 

Tel: (046) 13-69-79 

Telex: (854) 17886 (via Spanga 
Office) 

CH 


Hewlett-Packard Sverige AB 
Ostra Tullgatan 3 

$-21128 MALMO 

Tel: (040) 70270 

Telex: (854) 17886 (via Spanga 
Office) 

Hewlett-Packard Sverige AB 
Vastra Vintergatan 9 

S-70344 OREBRO 

Tel: (19) 10-48-80 

Telex: (854) 17886 (via Spanga 
office) 

CH 

Hewlett-Packard Sverige AB 
Skalholtsgatan 9, Kista 

Box 19 

S-16393 SPANGA 

Tel: (08) 750-2000 

Telex: (854) 17886 

Telefax: (08) 7527781 
A,CH,CM,CS,E,MS,P 
Hewlett-Packard Sverige AB 
Frotallisgatan 30 

S-42 132 VASTRA-FROLUNDA 
Tel: (031) 49-09-50 

Telex: (854) 17886 (via Spanga 
Office) 

CH,E,P 


SWITZERLAND 
Hewlett-Packard (Schweiz) AG 
Clarastrasse 12 

CH-4058 BASEL 

Tel: (61) 33-59-20 

A 


Hewlett-Packard (Schweiz) AG 
7, rue du Bois-du-Lan 

Case Postale 365 

CH-1217 MEYRIN 2 

Tel: (0041) 22-83-11-11 
Telex:27333 HPAG CH 
CH,CM,CS 

Hewlett-Packard (Schweiz) AG 
Allmend 2 

CH-8967 WIDEN 

Tel: (0041) 57 31 21 11 
Telex: 53933 hpag ch 

Cable: HPAG CH 
A,CH,CM,CS,E,MS,P 


SYRIA 

General Electronic Inc. 

Nuri Basha Ahnaf Ebn Kays Street 
P.0. Box 5781 

DAMASCUS 

Tel: 33-24-87 

Telex: 411215 

Cable: ELECTROBOR DAMASCUS 
E 


Middle East Electronics 
P.0.Box 2308 

Abu Rumnaneh 
DAMASCUS 

Tel: 33 45 92 

Telex: 411 304 

M 


TAIWAN 

Hewlett-Packard Far East Ltd. 
Kaohsiung Office 

2/F 68-2, Chung Cheng 3rd Road 
KAOHSIUNG 

Tel: (07) 241-2318 

CH,CS,E 

Hewlett-Packard Far East Ltd. 
Taiwan Branch 

8th Floor 

337 Fu Hsing North Road 
TAIPEI 

Tel: (02) 712-0404 

Telex: 24439 HEWPACK 
Cable:HEWPACK Taipei 
A,CH,CM,CS,E,M,P 

Ing Lih Trading Co. 

3rd Floor, 7 Jen-Ai Road, Sec. 2 
TAIPEI 100 

Tel: (02) 3948191 

Cable: INGLIH TAIPE/ 

A 


THAILAND 

Unimesa 

30 Patpong Ave., Suriwong 
BANGKOK 5 

Tel: 235-5727 

Telex: 84439 Simonco TH 
Cable: UNIMESA Bangkok 
A,CH,CS,E,M 

Bangkok Business Equipment Ltd. 
5/5-6 Dejo Road 

BANGKOK 

Tel: 234-8670, 234-8671 
Telex: 87669-BEQUIPT TH 
Cable: BUSIQUIPT Bangkok 
P 


TRINIDAD & TOBAGO 
Caribbean Telecoms Ltd. 
50/A Jerningham Avenue 
P.0. Box 732 
PORT-OF-SPAIN 

Tel: 62-44213, 62-44214 
Telex: 235,272 HUGCO WG 
CM,E,M,P 


TUNISIA 

Tunisie Electronique 

37 Avenue de la Liberte 
TUNIS 

Tel: 280-144 

EP 

Corema 

7 ter. Av. de Carthage 
TUNIS 

Tel: 253-821 

Telex: 12319 CABAM TN 
M 


TURKEY 

Teknim Company Ltd. 
Iran Caddesi No. 7 
Kavaklidere, ANKARA 
Tel: 275800 

Telex: 42155 TKNM TR 
E 


EMA. 

Medina Eldem Sokak No.4 1/6 
Yuksel Caddesi 

ANKARA 

Tel: 175 622 

Telex: 42 591 

M 


UNITED ARAB EMIRATES 
Emitac Ltd. 

P.O. Box 2711 

ABU DHABI 

Tel: 82 04 19-20 

Cable: EMITAC ABUDHABI 


Emitac Lid. 

P.O. Box 1641 
SHARJAH 

Tel: 591 181 

Telex: 68136 Emitac Sh 
CH,CS,E,M.P 


UNITED KINGDOM 


GREAT BRITAIN 
Hewlett-Packard Ltd. 
Trafalgar House 
Navigation Road 
ALTRINCHAM 

Cheshire WA14 1NU 

Tel: 061 928 6422 

Telex: 668068 
A,CH,CS,E,M,MS,P 
Hewlett-Packard Ltd. 
Elstree House, Elstree Way 
BOREHAMWOOD, Herts WD6 1SG 
Tel: 01 207 5000 

Telex: 89527 16 
E,CH,CS,P 
Hewlett-Packard Ltd. 
Oakfield House, Oakfield Grove 
Clifton BRISTOL, Avon BS8 2BN 
Tel: 0272 736806 

Telex: 444302 

CH,CS,E,P 
Hewlett-Packard Ltd. 
Bridewell House 

Bridewell Place 

LONDON EC4V 6BS 

Tel: 01 583 6565 

Telex: 298163 

CH,CS,P 

Hewlett-Packard Ltd. 
Fourier House 

257-263 High Street 
LONDON COLNEY 

Herts. AL2 1HA, St. Albans 
Tel: 0727 24400 

Telex: 1-89527 16 

CH,CS 

Hewlett-Packard Ltd. 
Pontefract Road 
NORMANTON, West Yorkshire WF6 1RN 
Tel: 0924 895566 

Telex: 557355 

CH,CS,P 

Hewlett-Packard Lid. 

The Quadrangle 

106-118 Station Road 
REDHILL, Surrey RH1 1PS 
Tel: 0737 68655 

Telex: 947234 

CH,CS,E,P 


IREAT BRITAIN (Cont'd) 
awiett-Packard Ltd. 

son House 

35 Stratford Road 
iirley, SOLIHULL, West Midlands 
90 4BL 

al: 021 745 8800 

plex: 339105 

H,CS,E,P 
ewlett-Packard Ltd. 

lest End House 

1 High Street, West End 
OUTHAMPTON 

ampshire SO3 3DQ 

el: 04218 6767 

elex: 477138 

H,CS,P 

ewiett-Packard Ltd. 
skdale Rd. 

finnersh, WOKINGHAM 
ierkshire RG11 5DZ 

el: 0734 696622 

‘elex: 848884 


lewlett-Packard Ltd. 
ing Street Lane 
Vinnersh, WOKINGHAM 
terkshire RG11 5AR 
‘el: 0734 784774 
‘elex: 847178 
\,CH,CS,E,M,MP,P 
jewlett-Packard Ltd. 
tine Mile Ride 
‘asthampstead, WOKINGHAM 
Jerkshire, 3RG11 3LL 
fel: 0344 773100 
Telex: 848805 
3H,CS,E,P 


(RELAND 


NORTHERN IRELAND 
dewlett-Packard Ltd. 
dardiac Services Building 
35A Finaghy Road South 
BELFAST BT10 OBY 

Tel: 0232 625-566 

Telex: 747626 

CH,CS 


SCOTLAND 
Hewlett-Packard Ltd. 
SOUTH QUEENSFERRY 
West Lothian, EH30 9TG 
Tel: 031 331 1188 
Telex: 72682 
CH,CM,CS,E,M,P 


UNITED STATES 


Alabama 
Hewlett-Packard Co. 
700 Century Park South, Suite 128 
BIRMINGHAM, AL 35226 
Tel: (205) 822-6802 
A,CH,M 
Hewlett-Packard Co. 
420 Wynn Drive 
HUNTSVILLE, AL 35805 
P.O. Box 7700 
HUNTSVILLE, AL 35807 
Tel: (205) 830-2000 
CH,CM,CS,E,M* 


Arizona 

Hewlett-Packard Co. 

8080 Pointe Parkway West 
PHOENIX, AZ 85044 

Tel: (602) 273-8000 
A,CH,CM,CS,E,MS 


Hewlett-Packard Co. 
2424 East Aragon Road 
TUCSON, AZ 85706 

Tel: (602) 889-4631 
CH,E,MS** 


California 
Hewlett-Packard Co. 

99 South Hill Dr. 
BRISBANE, CA 94005 
Tel: (415) 330-2500 
CH,CS 

Hewlett-Packard Co. 

P.O. Box 7830 (93747) 
5060 E. Clinton Avenue, Suite 102 
FRESNO, CA 93727 

Tel: (209) 252-9652 
CH,CS,MS 
Hewlett-Packard Co. 

P.O. Box 4230 

1430 East Orangethorpe 
FULLERTON, CA 92631 
Tel: (7 14) 870-1000 
CH,CM,CS,E,MP 
Hewlett-Packard Co. 

320 S. Kellogg, Suite B 
GOLETA, CA 93117 

Tel: (805) 967-3405 

CH 

Hewlett-Packard Co. 
5400 W. Rosecrans Boulevard 
LAWNDALE, CA 90260 
P.O. Box 92105 

LOS ANGELES, CA 90009 
Tel: (213) 970-7500 
Telex: 910-325-6608 
CH,CM,CS,MP 
Hewlett-Packard Co. 
3155 Porter Oaks Drive 
PALO ALTO, CA 94304 
Tel: (415) 857-8000 
CH,CS,E 
Hewlett-Packard Co. 
4244 So. Market Court, Suite A 
P.O. Box 15976 
SACRAMENTO, CA 95852 
Tel: (916) 929-7222 
A*,CH,CS,E,MS 
Hewlett-Packard Co. 
9606 Aero Drive 

P.O. Box 23333 

SAN DIEGO, CA 92139 
Tel: (619) 279-3200 
CH,CM,CS,E,MP 
Hewlett-Packard Co. 
2305 Camino Ramon “C” 
SAN RAMON, CA 94583 
Tel: (415) 838-5900 
CH,CS 

Hewlett-Packard Co. 
3005 Scott Boulevard 
SANTA CLARA, CA 95050 
Tel: (408) 988-7000 
Telex: 910-338-0586 
A,CH,CM,CS,E,MP 
Hewlett-Packard Co. 
5703 Corsa Avenue 
WESTLAKE VILLAGE, CA 91362 
Tel: (213) 706-6800 

E* ,CH*,CS* 

Colorado 
Hewlett-Packard Co. 

24 Inverness Place, East 
ENGLEWOOD, CO 80112 
Tel: (303) 649-5000 
A,CH,CM,CS,E,MS 


SALES & SUPPORT OFFICES 


Arranged alphabetically by country r¢ 
| 


Connecticut 
Hewlett-Packard Co. 

47 Barnes Industrial Road South 
P.O. Box 5007 

WALLINGFORD, CT 06492 

Tel: (203) 265-7801 
A,CH,CM,CS,E,MS 


Florida 

Hewlett-Packard Co. 

2901 N.W. 62nd Street 

P.O. Box 24210 

FORT LAUDERDALE, FL 33307 
Tel: (305) 973-2600 
CH,CS,E,MP 

Hewlett-Packard Co. 

6177 Lake Ellenor Drive 

P.O. Box 13910 

ORLANDO, FL 32859 

Tel: (305) 859-2900 
A,CH,CM,CS,E,MS 
Hewlett-Packard Co. 

5750B N. Hoover Bivd., Suite 123 
P.O. Box 15200 

TAMPA, FL 33614 

Tel: (813) 884-3282 
A*,CH,CM,CS,E* ,M* 


Georgia 
Hewlett-Packard Co. 
2000 South Park Place 
P.O. Box 105005 
ATLANTA, GA 30348 
Tel: (404) 955-1500 
Telex: 810-766-4890 
A;CH,CM,CS,E,MP 


Hawaii 

Hewlett-Packard Co. 
Kawaiahao Plaza, Suite 190 
567 South King Street 
HONOLULU, HI 96813 

Tel: (808) 526-1555 
A,CH,E,MS 


Ulinois 

Hewlett-Packard Co. 

304 Eldorado Road 

P.O. Box 1607 
BLOOMINGTON, IL 61701 
Tel: (309) 662-9411 
CH,MS** 

Hewlett-Packard Co. 

1100 31st Street, Suite 100 
DOWNERS GROVE, IL 60515 
Tel: (312) 960-5760 

CH,CS 

Hewlett-Packard Co. 

5201 Tollview Drive 
ROLLING MEADOWS, IL 60008 
Tel: (312) 255-9800 

Telex: 910-687-1066 
A,CH,CM,CS,E,MP 


Indiana 

Hewlett-Packard Co. 

7301 No. Shadeland Avenue 
P.O. Box 50807 
INDIANAPOLIS, IN 46250 

Tel: (317) 842-1000 
A,CH,CM,CS,E,MS 


lowa 

Hewlett-Packard Co. 

1776 22nd Street, Suite 1 
WEST DES MOINES, IA 50265 
Tel: (515). 224-1435 
CH,MS** 


Kansas 

Hewlett-Packard Co. 

7804 East Funston Road, #203 
WICHITA, KS 67207 

Tel: (316) 684-8491 

CH : 


Kentucky 

Hewlett-Packard Co. 

10300 Linn Station Road, #100 
LOUISVILLE, KY 40223 

Tel: (502) 426-0100 
A,CH,CS,MS 


Louisiana 
Hewlett-Packard Co. 
160 James Drive East 
ST. ROSE, LA 70087 
P.O. Box 1449 
KENNER, LA 70063 
Tel: (504) 467-4100 
A,CH,CS,E,MS 


Maryland 
Hewlett-Packard Co. 
3701 Koppers Street 
BALTIMORE, MD 21227 
Tel: (301) 644-5800 
Telex: 710-862-1943 
A,CH,CM,CS,E,MS 
Hewlett-Packard Co. 

2 Choke Cherry Road 
ROCKVILLE, MD 20850 
Tel: (301) 948-6370 
A,CH,CM,CS,E,MP 


Massachusetts 
Hewlett-Packard Co. 
1775 Minuteman Road 
ANDOVER, MA 01810 
Tel: (617) 682-1500 
A,C,CH,CS,CM,E,MP,P* 
Hewlett-Packard Co. 
32 Hartwell Avenue 
LEXINGTON, MA 02173 
Tel: (617) 861-8960 
CH,CS,E 


Michigan 
Hewlett-Packard Co. 
4326 Cascade Road S.E. 
GRAND RAPIDS, MI 49506 
Tel: (616) 957-1970 
CH,CS,MS 
Hewlett-Packard Co. 
1771 W. Big Beaver Road 
TROY, MI 48084 

Tel: (313) 643-6474 
CH,CS 


Minnesota 
Hewlett-Packard Co. 
2025 W. Larpenteur Ave. 
ST. PAUL, MN 55113 
Tel: (612) 644-1100 
A,CH,CM,CS,E,MP 


Missouri 
Hewlett-Packard Co. 
11131 Colorado Avenue 
KANSAS CITY, MO 64137 
Tel: (816) 763-8000 
A,CH,CM,CS,E,MS 
Hewlett-Packard Co. 
13001. Hollenberg Drive 
BRIDGETON, MO 63044 
Tel: (314) 344-5100 
A,CH,CS,E,MP 


() 


SALES & SUPPORT OFFICES 


Arranged alphabetically by country 


UNITED STATES (Cont'd) 


Nebraska 
Hewlett-Packard 

10824 Old Mill Rd., Suite 3 
OMAHA, NE 68154 

Tel: (402) 334-1813 
CM,MS 


New Jersey 
Hewlett-Packard Co. 
120 W. Century Road 
PARAMUS, NJ 07652 
Tel: (201) 265-5000 
A,CH,CM,CS,E,MP 
Hewlett-Packard Co. 

60 New England Av. West 
PISCATAWAY, NJ 08854 
Tel: (201) 981-1199 
A,CH,CM,CS,E 


New Mexico 
Hewlett-Packard Co. 
11300 Lomas Bivd.,N.E. 
P.O. Box 11634 
ALBUQUERQUE, NM 87112 
Tel: (505) 292-1330 
CH,CS,E,MS 


New York 
Hewlett-Packard Co. 
5 Computer Drive South 
ALBANY, NY 12205 
Tel: (518) 458-1550 
A,CH,E,MS 
Hewlett-Packard Co. 
9600 Main Street 
P.O. Box AC 
CLARENCE, NY 14031 
uct (716) 759-8621 
H 


Hewlett-Packard Co. 

200 Cross Keys Office Park 
FAIRPORT, NY 14450 
Tel: (716) 223-9950 
CH,CM,CS,E,MS 
Hewlett-Packard Co. 
7641 Henry Clay Bivd. 
LIVERPOOL, NY 13088 
Tel: (315) 451-1820 
A,CH,CM,E,MS 
Hewlett-Packard Co. 

No. 1 Pennsylvania Plaza 
55th Floor 

34th Street & 8th Avenue 
MANHATTAN NY 10119 
Tel: (212) 971-0800 
CH,CS,E*,M* 
Hewlett-Packard Co. 

250 Westchester Avenue 
WHITE PLAINS, NY 10604 
Tel: (914) 684-6100 
CM,CH,CS,E 
Hewlett-Packard Co. 

3 Crossways Park West 
WOODBURY, NY 11797 
Tel: (516) 921-0300 
A,CH,CM,CS,E,MS 


North Carolina 
Hewlett-Packard Co. 
5605 Roanne Way 

P.O. Box 26500 
GREENSBORO, NC 27420 
Tel: (919) 852-1800 
A,CH,CM,CS,E,MS 


Ohio 
Hewlett-Packard Co. 
9920 Carver Road 
CINCINNATI, OH 45242 
Tel: (513) 891-9870 
CH,CS,MS 
Hewlett-Packard Co. 
16500 Sprague Road 
CLEVELAND, OH 44130 
Tel: (216) 243-7300 
A,CH,CM,CS,E,MS 
Hewlett-Packard Co. 
962 Crupper Ave. 
COLUMBUS, OH 43229 
Tel: (614) 436-1041 
Eff: Nov. 25, 1983 
675 Brooksedge Blvd. 
WESTERVILLE, OH 43081 
CH,CM,CS,E* 
Hewlett-Packard Co. 
330 Progress Rd. 
DAYTON, OH 45449 
Tel: (513) 859-8202 
A,CH,CM,E*,MS 


Oklahoma 
Hewlett-Packard Co. 

304 N. Meridian, Suite A 
P.O. Box 75609 
OKLAHOMA CITY, OK 73147 
Tel: (405) 946-9499 
A*,CH,E*,MS 
Hewlett-Packard Co. 

3840 S. 103rd E. Avenue, #100 
P.O. Box 35747 

TULSA, OK 74153 

Tel: (918) 665-3300 

A** ,CH,CS,M* 


Oregon 
Hewlett-Packard Co. 
9255 S. W. Pioneer Court 
P.O. Box 328 
WILSONVILLE, OR 97070 
Tel: (503) 682-8000 
A,CH,CS,E* ,MS 


Pennsylvania 
Hewlett-Packard Co. 
111 Zeta Drive 
PITTSBURGH, PA 15238 
Tel: (412) 782-0400 
A,CH,CS,E,MP 
Hewlett-Packard Co. 
2750 Monroe Boulevard 
P.0. Box 713 

VALLEY FORGE, PA 19482 
Tel: (215) 666-9000 
A,CH,CM,E,M 


South Carolina 
Hewlett-Packard Co. 
Brookside Park, Suite 122 
1 Harbison Way 

P.O. Box 21708 
COLUMBIA, SC 29221 

Tel: (803) 732-0400 
CH,E,MS 

Hewlett-Packard Co. 
Koger Executive Center 
Chesterfield Bldg., Suite 124 
GREENVILLE, SC 29615 
Tel: (803) 297-4120 


Tennessee 
Hewlett-Packard Co. 

224 Peters Road, Suite 102 
P.O. Box 22490 
KNOXVILLE, TN 37922 

Tel: (615) 691-2371 
A*,CH,MS 


Hewlett-Packard Co. 
3070 Directors Row 
MEMPHIS, TN 38131 
Tel: (901) 346-8370 
A,CH,MS 


Texas 
Hewlett-Packard Co. 
4171 North Mesa 

Suite C-110 

EL PASO, TX 79902 

Tel: (915) 533-3555 
CH,E* ,MS** 
Hewlett-Packard Co. 
10535 Harwin Drive 
P.O. Box 42816 
HOUSTON, TX 77042 
Tel: (713) 776-6400 
A,CH,CM,CS,E,MP 
Hewlett-Packard Co. 
930 E. Campbell Rd. 
P.O. Box 1270 
RICHARDSON, TX 75080 
Tel: (214) 231-6101 
A,CH,CM,CS,E,MP 
Hewlett-Packard Co. 
1020 Central Parkway South 
P.O. Box 32993 

SAN ANTONIO, TX 78216 
Tel: (512) 494-9336 
CH,CS,E,MS 


Utah 

Hewlett-Packard Co. 

3530 W. 2100 South 
SALT LAKE CITY, UT 84119 
Tel: (801) 974-1700 
A,CH,CS,E,MS 


Virginia 
Hewlett-Packard Co. 
4305 Cox Road 

GLEN ALLEN, VA 23060 
P.O. Box 9669 
RICHMOND, VA 23228 
Tel: (804) 747-7750 
A,CH,CS,E,MS 


Washington 
Hewlett-Packard Co. 
15815 S.E. 37th Street 
BELLEVUE, WA 98006 
Tel: (206) 643-4000 
A,CH,CM,CS,E,MP 
Hewlett-Packard Co. 
Suite A 

708 North Argonne Road 
SPOKANE, WA 99212 
Tel: (509) 922-7000 
CH,CS 


West Virginia 
Hewlett-Packard Co. 
4604 MacCorkle Ave. 
P.O. Box 4297 
CHARLESTON, WV 25304 
Tel: (304) 925-0492 
A,MS 


Wisconsin 
Hewlett-Packard Co. 

150 S. Sunny Slope Road 
BROOKFIELD, WI 53005 
Tel: (414) 784-8800 
A,CH,CS,E* MP 


URUGUAY 

Pablo Ferrando S.A.C. é |. 
Avenida Italia 2877 
Casilla de Correo 370 
MONTEVIDEO 

Tel: 80-2586 

Telex: Public Booth 901 
A,CM,E,.M 


VENEZUELA 

Hewlett-Packard de Venezuela C.A. 
3RA Transversal Los Ruices Norte 
Edificio Segre 1,2 & 3 

Apartado 50933 

CARACAS 1071 

Tel: 239-4133 

Telex: 251046 HEWPACK 
A,CH,CS,E,MS,P 

Hewlett-Packard de Venezuela C.A. 
Calle-72-Entre 3H y 3Y, No. 3H-40 
Edificio Ada-Evelyn, Local B 
Apartado 2646 

4001, MARACAIBO, Estado Zulia 
Tel: (061) 80.304 

C,E* 

Hewlett-Packard de Venezuela C.A. 
Calle Vargas Rondon 

Edificio Seguros Carabobo, Piso 10 
VALENCIA 

Tel: (041) 51 385 

CH,CS,P 

Bioelectronica Medica C.A. 

Calle Buen Pastor 

Edif. Cota Mil-Piso 2 y Semi Sotano 1 
Boleita Norte 

Apartado 50710 CARACAS 1050A 
Tel: 239 84 41 

Telex: 26518 


ZIMBABWE 

Field Technical Sales 
45 Kelvin Road, North 
P.B. 3458 
SALISBURY 

Tel: 705 231 

Telex: 4-122 RH 
C,E,M.P 


July 1983 5952-6900 
Indicates main office 
HP distributors are printed in italics. 
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